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Let's Talk; 06, 17/82 
Bob Lissner 


Telephone: 702) 831-1722 
On-] xne 24 hours 


Welcome to this bulletin board for AppleWorks accessory developers. 


Master Menu 


1. INTRODUCTION 
... < LIT ERATURE 

3. ELECTRONIC. MAIL 

4. QUIT 


1. INTRODUCTION 

This system runs at 1200 or 300 baud, depending on your modem. 

This bulletin board system assumes that you are recording the information you 
receive. For that reason, and to reduce your phone bill, you don't get much of 
a chance to read the information while it is being sent to you. 

If you want to stop and read each screen of data, you'll need to know the 
following commands: 

Control -S or Option-3 stops the text display 
< SPACE-BAR) to resume the display 

Control -X or Option-X stops the text display and returns 
to previous menu 


This bulletin board was designed for software engineers, but is open to all 
callers. Your comments and questions are appreciated and should be sent to; 

AppleWorks Product Manager 
Claris Inc. 

440 Cl yde Ave < 

Mountain View, CA 94043. 

Read "Read .Me .First" in "Literature” for a summary of each document. 


End of Introduction 



LITERATURE 


I, FILES. H. TO. 20 
2 • Hi 

J, WHAT S. NEW 

4 . FI LEh' , 1 . TO . i 0 

5. FILES. 21. TO. 30 

6 . FI LES .31 .10. 40 
READ . : .FIRST 


H)e!p EJxpand Drevxous menu U)pload ' i; a M) aster menu 


H > ELF 1 


i. Menu. Choices? Choosing from our presentat ion of Files 

r'ou can take a tour of the files offered in this presentation . 

Some of these files allow comments to be added to them. You may choose to 
comment when prompted to do so. 

ess in t the number corresponding to a file presents that file to /ou. Some 
selections may cause other menus to appear. 

Pressing E for EJxpand displays the title line (a brief description) of each 
file within the current menu. 


Pressing "P" for P)revious menu removes the current menu and takes you. 
backwards through the menus you've chosen. 

Pressing M for Master menu will return you to the main log-on log-off menu. 


2. Commands: 


< CONTROL) S 
\ SPACE-BAR ) 
< CONTROL) X 
< CONTROL) C 


Helpful Commands to Control Display' 
pauses the text display 
to resume the display 

stoos the text display and returns to previous menu 

to signal that you are done entering text when prompted for 
unlimited text comments. 


— end of help 



7. READ. ME. FIRST 


Index 3t ai ! documents on r 1 a. Changed 4/20/toS. 

This bulletin board contains m -format ion that should be useful to developers. 
File formats will assist anyone working with AppleWorks files on disk, and the 
remainder of the information will assist developers working on accessories that 
run while AppleWorks is also running. 

These files include source code from version 2.0, and also from LAN version 
2.1, recently announced by Claris and currently in Beta test. 2.1 source code 
is correct as of 4/25/SB, but may be changed prior to availability of the 
product. LAN version 2.1 works only or LANs. 

The differences are minor between the 2.0 and 2.1 LAN source code provided 
here, as every attempt was made to keep variables, jump tables, and code 
segments in constant locations. 

It you have suggestions about how we can improve the bulletin board, write C r 
cal'! the AppleWorks product managers at Claris. Your notes left on this 
bulletin board ARE NOT answered. 

This bulletin board is not provided by Claris. No-one is guaranteeing that 
it's 100>. right. 

future versions of AppleWorks may cause substantial changes in the contents c- : 
these f i 1 es , but we do attempt to make as few changes as possible in the basi 
locations. 

This bulletin board is running on an Apple //e with an 800KB disk, and Let's 
Tab; software from Russ Systems, in Santa Crus CA. 

This information may be copied as necessary. 

Please record this file. It is your only index to all the other files in this 
1 ibrary . 



INDEX OF FILES 


Data bass Common , File 1. Definitions used in all data base segments, 

on oi files and work art ; OK bytes. File 31 for 

2 . i LAN . 

Files 2 and 15. ippieWorks 
Unchanged -for 2.1 LAN. 

File 3. 

common work areas useo by a- app \ xcations . Dst mes manv of the symbol s 
referenced in other files. 20K bytes. File 21 for 2.1 LAN. 

File 3 contains most of the basic definitions,, 

:ation . Fi 1 e 4. Define 

2.0 and 2.1, That "allow you to intercept keystrokes and output to the screen. 
3k bytes. 

■ oj Fi 1 a 5 . ' ie ■ nai n 

AppleWorks. You can use these routines, at your risk, 
o+ course, for a number of the functions that are basic to any assembly 
language program. File 6 defines where the routines are "located. 6k bytes. 


Host entry point; 


He 


This defines addresses that can be JSR'd to for 


File 5 describe; the .. File 22 

for 2.1 LAN. 


Sub- r. ost document at ion . File 7., This describes more routines that are 


P e r m a hi n fTy re s*i d efTE 


ho; 


certain to memory management 


Please note that a patent is pending on these memory management routines, so 
you may end up paying us royalties if they're copied. 5K bytes. 

File 8. Thi joints 

suEFh ost routines . IF. bytes, tile 23 for 2.1 LAN. 

S p re adshee t Common . File 9. Definitions used in all spreadsheet segments, 

6K File 38 for 

2.1 LAN. 

Word processor Com mon. File 10. Definitions used in all word processor 

location of f i : es arc work memory. 10 k bvfps. 

File 36 for 2,1 LAN. 

za riles 11, 12 and 13. bytes. File 24 contains only 

changes in 2.1 EAR. 

Me mory manager. Use of //gs memory manager by version 2.0 and version 2.1. 

FTTe T4T; 2k Bytes. 

Bugs in 2.0 , and conflicts between 2.0 and other programs being developed for 
the //gs. File 16. 2k bytes, 

Dsg.pr . File used to define parts of seg.pr as needed at various points within 


... .. orks , 


c and 2 1 LAN . File 26,, 


De sk t op manager entry _ points a nd vari abl es f or ma i n 

source, arid is probably unchanged from 2,0, File 27. 


segment 


is 


,1 LAN' 


Data base entry po i nts and variabl es _f or main segment. This is 2.1 LAN source, 

and is proBaBTy unchanged from 2 „ o , File 32, 


Data Pass report writer (print) common wort area. 
F iTe 337 

D ata base report writer roam segment entry points 

t .. ■ . . .. and 2 

Wor d pr ocessor main se gme nt entry point; 

CfiFT . 2.0 is probaBl v the same. 


,0 and 2,1 are the same. 


:.u and 


File 34 , 


Fib 


35. 


File 37 i ; 


., . s . h ' " " ' ■ i n ;ver 1 ay entry • . a an d so me ... s iab 1 . ., 


F i 1 e 39 


is 2.1 LAN. 


File 40 is 2.1 LAN,, 

— End of index file 



H Lt LuN i EN I S EXPANDED 


4, rlLES.l .iO.lQ 


i a FI LE . 1 
™ . FILE.L 

3. FILE. 3 

4 . FILE .4 

5. FILE. 5 
6 a i i. LE . 3 

7. FILE. 7 

8 . F I LE . 8 

9 . F I LE . 9 
0. FILE. 10 


5 Equates and zero page locations For Data base 
; Part I of File formats for Appl eWorks and /// E-2 Pieces 
5 Equates and definitions used throughout Appl eWorks. 
i This is documentation of hooks in 2.0 Apl works .system . 

: j ■ ■ ' :at ' 'manentl y ;nt ippl ) rfi i ines . 

; These are references to the routines in Host 
; Book Sub Host contains many of the host routines. 

; These are references to the routines in SubHost 
; Common routines for Spreadsheet assembly 
; Common routines for Word Processor assembly 


1. FILES. 11 .TO. 20 


1. FILE. 12 

2. FILE. 13 

3. FILE. 14 

4 . FILE . 15 

5. FILE. 16 

6. FILE. 11 


; Part II of seg. pr source code. 

; Part III of seg.pr source code. 

; How Appl eWorks utilizes //gs memory manager 
; Part II of File formats for Appl eWorks and Hi E-Z Pieces 
? Bugs and conflicts in Appl eWorks version 2.0. 

; This becomes segment Sag. PR. It is definitions of printers 


5 ■ FILES. 21 .10.30 


■ 1 . 26 

2. FILE. 23 
3 . FI LE .24 

4. FILE. 21 

5. FILE. 22 
6 , FI LE . l 7 


; These are references to the routines in SubHost. 
i This becomes segment Seg. PR. It is definitions of printers 
; Equates and definitions used throughout Appl eWorks. 

; These are references to the routines in Host. 


6. FILES. 31 .10.40 


1 . F ILE .31 

n 1 X L Law 

3. FILE, 33 

4. FILE. 34 

5. FILE. 35 
6 « FILE .36 

7. FILE. 37 

8 . FILE. 38 

9. FILE. 3? 
0. FILE. 40 


; Equates and zero page locations for Data Base. 

: These are the entry points into Main Segment, 

; Zero page locations for RWSeg . 

; Book RWSegRef . 

; THE FOLLOWING MUST BE IN ORDER, AS THEY COME FROM DISK *. 
; Common routines for Word Processor assembly. 

; C ! earF i 1 eHeader , Equ LWF'Ma 1 n+2+3 . 

5 Common routines for Spreadsheet assembly, 

\ Book of references to Main portion of Calculator Edit. 

; AccumType .Equ LSSMai n+2+3. 


— End of file contents expanded 



■3 , W HATS .NEW 


What's new on the bulletin board s 

4/25/88 Version 2.1 LAN tiles added. Additional -files, not previously 

available on this bulletin board, are shown. Version 2.1 LAN is in 
Beta test, and is subject to change. 

1 . 8/ 3 arm 3 of added F s 4 h so 5 

documentat ion . 

1/8/87 File 16, bugs, has been added to. 

12/12/86 File 16 added. Bugs in 2.0. or conflicts between 2.0 and other 
programs being developed tor the //gs. 

11/20/86 Explanation of now AppleWorks uses the memory manager on the gs. 
File 14. 

11/20/86 File formats were incomplete. Now Files 2 and 15. 


11/20/86 File 2 changed to show that byte +92 of the WP header record pertains 
to mail -merge. 


11/14/86 Source code for seg.pr. Files 11, 12 and 13 
— End of What's new 



Mam UiorK Ar-ga 


Equates and definitions used throughout AppleWorks. 

This file is included in each AppleWorks segment . Other- 
developers may be interested in the individual components 
$600 byte work area defined here. 

Parameters that control assembly, 5 Combined refers to whether 
the segments are combined into one file, ! hev are for distributiion. 
are not for my testing. 


combined 
Crippl ed 
Language 
upsvs 
Testing 
Warn Em 

OAkey 

DateCode 


ERELength 

ERQFormFeed 

ERQPageStop 

EroNeedLF 


Fal se 


.Equ 

0 

5 

1 or- 0 , boolean 

.Equ 

0 


.Equ 

“A" 

? 

Contra 1 s assemb 1 v 

.Equ 

2 

5 

Controls assembly 

.Equ 

0 



.Equ 

0 

5 

i or 0 , warn msg on 

, Equ 

.Equ 

so 

192. 


Open apple adds this 

Environment 

record inf or 

‘mat ion 


.Equ 

36. 

5 

Length of ER Printer 

.Equ 

SO 


.Equ 

40 



.Equ 

20 



.Equ 

0 



Bits to tell 

WriteVBar t 

VBarWrRtn ) 

to writs relative 


spl ash 


to 


left of bo;- 


F Luef tS ids 

.Equ 

30 

FCTopLine 

.Equ 

SO 

Indent 

.Equ 

SO 

LPrF i x ed 

.Equ 

136 . 

MaxOnDesk 

.Equ 

12 . 

lie 

. Equ 

207 , 

PosSegs 

.Equ 

43, 

c sSeg sX4 

.Equ 

1 "77 

Screen Width 

.Equ 

80 , 

T imeCode 

.Equ 

212 . 

True 

.Equ 

i 

)nA tack 

.Equ 

0C009 

TurnQf AStack 

.Equ 

0C008 


.Equ 

0 

5 Items that 

control assemb 1 y 

for -fori 


Flags Indent needed 

Fixed area in printer def ns. 


; For Mac conver 
foreign languages 


: 1 on 


KCommalnNo 

KDateSep 

KDecPoint 

KCurrency 

K'vertBar 

No 

ComA'i tiHel p 
ComA i t 2He ’ p 
L-omAl t3Hel p 
ComCl r2End 

■ . e 

LomEndSC 

ComHel p 

ComHardCopy 

Comuuick 

ComSave 

LastLCChar 

LastUCChar 

StdPL 

KSFMarker 


• If 

.Equ 

.Equ 

.Equ 

■ §cu 

.Equ 

.Equ 

.Equ 

.Ecu 


Langu a q e ~ 

u 11 
nj-n 
II il 
V. H 
I! ; il 

11 N" 

li y K 

n / H +0AKev 


.Equ 

"/"+0AKey 


.Equ 

"/"+0AKey 


.Equ 

91 =; 

5 Control-Y 

, Equ 

"E ,, +0AKev 


.Equ 

:» ••• il 

; To end printer 

.Equ. 

"?"+0AKev 


, Equ 

"H"+QAKey 


.Equ 

"Q"+0AKey 


.Equ 

"S"+0AKey 


.Equ 

n ? a 


.Equ 

11 y ii 


r- ' 

.Equ 

110 . 

*, Standard paper 

.Equ 

II A !? 

1 10 displ ay WP 

,Endc 






.If 

LSr fCjLl-SCMS 2 * ” 


Kuorama I nNo 

.Equ 

It !! 


KDateSep 

.tqu 

If II 

/ 


K Dec Pa i nt 

• Equ 

If ii 

± 


KCurrency 

.Equ 

llpll 


KVertBar 

.Equ 

n 'i it 


No 

.Equ 

,! N" 


Yes 

.Equ 

HQ" 


ComAl tiHei p 

.Equ 

V+OAKey 


ComAl t2Hel p 

.Equ 

" , " +QAKey 


ComA'i t3Hel p 

.Equ 

; ■ lAKe 


ComCl r2End 

.Equ 

25 » 

,* Control -Y 

ComEd i tMode 

.Equ 

"A"+QAKey 


ComEndSC 

.Equ 

11 - "+0AKey 

; To end printer special codes 

ComHel p 

.Equ 

" ? " +OAKey 


C o in H a r d C □ p y 

.Equ 

"H"+QAKey 


ComQuick 

.Equ 

"Q"+0AKey 


comSave 

.Equ 

"S"+OAKsy 


LastLCLhar 

.Equ. 

<l_r 1 ! 


LastUCChar 

.Equ 

H 7 it 

Xm 


StdPL 

.Equ 

117. 

; Standard paper 1 ength 

KSFMark: er 

.Equ 

II \ l? 

; To display WP special functions 


.Endc 




.If 

Language="S i! 


KCommalnNo 

.Equ 

II ii 


KDateSep 

.Equ 

fl t! 


KDecPoiht 

• Equ 

H li 
«l 


KCurrency 

.Equ 

i! ft n 

xJ 


KVertBar 

.Equ 

n i n 


No 

.tqu 

"M" 


Y es 

.Equ 

"J” 


ComAl tlHel p 

.Equ 

" / " +GAKey 


ComA'i t2He'i p 

.Equ 

,, ~ ,, +QAKev 


ComA'i t3Hel p 

.Equ 

" / " +QAKey 


ComAl tHel p 

.Equ 

7E+0AKey 


ComCl r2tnd 

.Equ 

25. 

; Control -Y 

ComhditMode 

.Equ 

"C+OAKey 


ComEndSC 

.Equ 

" " +OAKev 

; To end printer special codes 

ComHe 1 p 

.Equ. 

“?" +OAKey 


ComHardCopy 

.Equ 

" X " +0AKey 


ComQuick 

.Equ 

"W"+OAKev 


L-omSave 

.Equ 

,, S"+0AKey 


LastLCChar 

.Equ 

fi h H 

J 


LastUCChar 

.Equ 

1! 1 II 

J 


StdPL 

.Equ, 

1 vfl 

i jL V st 

5 Standard paper 1 ength 

KSFMark er 

.Equ 

II * II 

i To display WP special functions 


.Endc 





.If 

Language= , 1 I" 


KComma I. nNo 

.Equ 

n it 


KDat eSep 

.Equ 

I! II 
/ 


KDecPoiht 

.Equ 

n u 

H 


KCurrency 

.Equ. 



KVertBar 

.Equ 

I! { U 


No 

■ Equ 

“N” 


t es 

.Equ 

H II 


ComCl r2End 

.Equ 

•~ET 
j.. a 

l Control -Y 

ComAl tiHei p 

.Equ 

"/ ,! +QAKey 


ComAl t2He ! d 

. tqu 

" , " ] : 


ComAl t3Hel p 

.Equ 

"/"+OAKev 


ComEd i tMode 

.tqu 

” X " +QAKey 


ComEndSC 

.Equ 

" "■ "+0AKey 

\ To end printer special codes 

ComHel p 

.Equ 

"?“+0AK'ey 


ComHardCopy 

.Equ 

!! H ‘‘ +OAK.ey 


ComQuick 

.Equ 

"Q"+QAKey 


Ss . € 

.Equ 

"A"+OAKev 


LastLCChar 

.Equ 

IE 


LastUCChar 

.Equ 

ii 7 ii 


StdPL 

.Equ 

120 , 

; Standard paoer length 

KSFMark er 

.Equ 

1! ••• J| 

; To display WP special functions 


.Endc 
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s Hor and verti 

CH 

CV 

KOAChar 

KMouseReturn 


i^ilsBuf 

HostWA 

LHostWA 

HostLocn 

Lbane 

LEI em 

LHiSane 

LHiEI ems 

Li Poane 

LHiEI em 

LSubHost 

DOWA 

SbWA 

OBWA 

WPWA 


• Equ 
•Eq u 
.Equ 
.Equ 


First the items 
.Equ 
.Equ 
.Equ 
.Equ 
.tqu 
.Equ 
.Equ 
.Equ 
• Equ. 

.Equ 
.Equ. 

.Equ 
.tqu 
.Equ 
.Equ 


driver. Used in 

14 

15 
81 
8D 


that -are common 
0800 
0A00 
600 
1000 
2 1 00 
0D000 

0D0 

occ 

0D0 

0D000 

7500 

7D00 

7B00 

7B00 


SubHost too 

; Position rel to top left 
; Position rel to top left 

oatween all f i \ as 
. Length 

5 Apple SANE numerics package 
5 Apple elementary functions 

; Beg of 34 zero page locns. 

5 For disk directory work 


; Equates for 

rsi ative 

addresses of max 

LUrgMam 

.Equ 

2 1 00 

LQCMa i n 

.Equ 

7500 

LQFMain 

.Equ 

6B0O 

LQWHain 

.Equ 

6E00 

LHiOrgMain 

• Equ 

41 

LHiQCMain 

• Equ 

*?5 

LHiQFMain 

.Equ 

6§ 

LHi GWMa i n 

.Equ 

6E 


modui es 


: Equates for relative addresses of segments for each system 


LOrgSegs 

.Equ 

4000 

LQCSegs 

.Equ 

3900 

LQFSegs 

.Equ 

3900 

LQWSegs 

.Equ 

2100 

LQCOverl ay 

.Equ 

5 1 no 

LHiOrgSegs 

.Equ 

40 

LHiQCSegs 

.Equ 

39 

LHiQFSegs 

.Equ 

39 

LHiQWSegs 

.Equ 

21 

LHiQCOverl ay 

.Equ 

51 


For / 

/ 0 b 8. n 1 k 3 d d P 0331; 

1 OBuf t ©r 

.tqu 

OBBOO 

PDDevCntMl 

.Equ 

0BF31 

PDBevLst 

.Equ 

0BF32 

1 IMainBase 

.tqu 

8F 00 

i 1 H i Ms. 1 n lr* -3 SB 

.Egu 

SF 

IlAuxBase 

.Equ 

0800 

1 IHiAuxBase 

.tqu. 

8 

Max QCRows 

.Equ 

V9'V a 

RaMain4S 

.tQU 

0C002 


.EQU 

OC003 

WrMain43 

.EQU 

0C004 

WrAux 48 

.EQU 

0C005 

RWAux 16 

.EQU 

00009 

tWMa l n 1 6 

. tQU 

ocoos 


■; 1 ,3 changed from 6300 


; 1 .3 changed from 63 


Values temp room for SubHost 

; F'roDOS devices attached 
. ProDOS devices attached 
i First storage avail in main 

; First storage avail in au;: . 
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t ■ vps cooes tor n urnsp i c p b. c k b. q 

5 


U |!C j- v £ 

.Equ 


0 


FFDb. 

.Equ 




FFInt 

.Equ 


4 


f Gc canes far 

numer ics 

package 



FOAdd 

.tqu 


(*} 


FGSetEnv 

.Equ 


I 


FOSud 

.Equ 




FOSetEnv 

.Equ 




FQMul t 

.Equ 


4 


F Ul' i v 

.Equ 


Q 


FGD2B 

.Equ 


9 


F UbLD 

.Equ 


OB 


FOSQRT 

> c.C| LI 


12 


FORT I 

.Equ. 


14 

5 Round to integer 

FOTTI 

.Equ 


i 6 

3 Truncate to integer 

t‘ Ul ! 3'SS 

.Ecu 


1C 


FOABS 

a 


OF 

3 Absolute 

F'OCMF 

.Equ 


00 

3 Compare 

FONeg 

.Equ 


OB 


F0Z2X 

.Equ. 


OE 


FDX2Z 

.Equ 


10 


LExtNum 

.Equ 


10. 


3 And opcodes 

for El ems 

package 



FOXPwrY 

.Equ 


12 


; Appl i cat ion 

cal 1 cods 

s . Host 

wil 1 

p i -3CS tJlS35 VS 1 U0S in X 

; when making 

Cell 1 5 to 

the individual 

Main routines. A high bit added 

3 means to jus 

t get the 

proper 

■nodules loaded for this, but not called. 




Returns to 

ACC1 oseFi ! e 

.Equ 


i ; 

Caller, put back in banks, release WA 

ACInitFi 1 s 

• Eau. 



Caller, is in WA, needs pointers inited 

ACMergeF i 1 e 

.Equ 


S3 i 

Host , 

ACNewFrKB 

.Eau 


B4 ; 

Host , 

ACNewFrCB 

.Equ 


85 3 

Host, Cl ipboard 

ACQpenF i 1 e 

.Equ 


6 3 

Caller, Sets from banks, does in it 

ACRel easeF i 1 e 

.Equ 


t 1 

Caller, release the bank switched 

ALRssunisF 1 1 s 

.Equ 


BB ; 

Host, already in work area, in it done 

lOFai 1 ed 

.Equ 

2P+003 



jr 

All of 

the following 

depend on whether or not 31 inky 


is work 

mg . 



ALVDBMMP 

.Equ 

ZP+004 

* 

A (Ptr for maximum record) 

ALVWPMMF 

.Equ 

Z P+006 


ACPtr for maximum 1 ine) 

AEndSSWA 

.Eau 

ZP+OOB 


A (Last byte of BldRecWA) 

MaxBBRecs 

.Equ 

ZP+OOA 

* 

Maximum recs al 1 owed in BB 

MaxWF'Lines 

.Equ 

ZP+OOC 


Maximum lines allowed in WP 

Max SSRS ize 

«Equ 

ZF'+OOE 

« 

5 

Maximum record size in SS 

Auk R ea 

.Equ 

Z P+080 



CDAddr 

• Equ 

ZP+OBO 


Used by console driver 

CurHor 

.Eau 

Z P+082 


Cursor position 

CurVer 

.Equ 

ZP+083 

“ 

Cursor pas it ion 0 ,,21 

CWork 1 

.Eau 

ZP+084 



SpaceOK 

.Eau 

ZP+085 


Cleared, set by SMPut routines. 

FoundCommand 

.Equ 

ZP+086 



FoundReturn 

.Egu 

Z P+087 



FoundEscaoe 

.Equ 

ZP+088 


Won zero if escape found 

Hel p Avail 

.Equ 

ZP+089 



I 

.Equ 

ZP+08A 



IntFrKB 

.Equ 

ZP+08C 


numeric 

LLR 

.Equ 

ZP+08B 



LLB 

.Equ 

ZP+08F 


is 3. word 

s Work area for Hultipl 

y 



MReg 

.tqu 

ZP+091 



MWrk X 

.Equ 

Z P+093 



MWrk Y 

.Equ 

ZP+094 



F'ageBegin 

.Equ 

ZP+09F5 



Pagetnd 

.Equ 

Z P+096 



Re turn Code 

.Equ 

ZP+097 







cq £ | pi (J 



:ui 

through iReg 

02 must be in order 

Kt-TURNO 

.fcQU 

ZP+098 

RETURNS 

.EQU 

ZP+09A 

AArg 

.Equ 

ZP+09A 


.EQU 

ZP+09C 

BArg 

• Equ 

ZP+09C 

ZReg 00 

. t q u 

ZP+09E 

CArg 

■ Equ 

ZP+09E 

ZReg 02 

• Equ 

ZP+OAO 

DArg 

:: "C Cj U 

ZP+OAO 

R1 

• Equ 

ZP+0A2 

Ex itFI ag 

.Equ 

ZP+0A4 ; HAS GA- 

; to bail 

Work 1 

.Equ, 

ZP+0A5 

FR 

. EQU 

ZP+0A6 

FBR 

5 

.Equ 

ZP+ODO 

j i ness are 

output to the screen codes; For- i 

Cl earELine 

.Equ 

« 

l 

Cl earLine 

■ hqu 

■n 

c! earVP 

• Equ. 


Cl earfcVP 

.Equ 

4 

AbsPosn 

.Equ 

5 

Lett 

.Equ 

6 

Fdght 

.Equ 

/ 

Up 

.Equ 

8 

Down 

.Equ 

9 

Inverse 

.Equ 

1 0 . 

Normal 

.Equ 

11 . 

VPBot 

.Equ 

12. 

Return 

.Equ 

13. 

VPTop 

.Equ. 

14. 

VPReset 

.Equ 

15 . 

Reset VP 

.Equ 

15. 

Bel 1 

.Equ 

16 . 

HorShif tVF* 

.Equ 

17. 

; ! hese are 

input codes 

, some output too. 

ComCurLe-ft 

.EQU 

8 

ComCurRight 

.EQU 

21 . 

ComCurUp 

.EQU 

J. X a 

ComCurDown 

.Equ 

10. 

ComTabLe-f t 

.tqu 

137. 

ComTabRight 

.Equ 

9 . 

ComEscape 

.EQU 

■~i~! 

ComDel Key 

.Equ 

7F* 

ComReturn 

.Equ 

13 . 

ComLineFeed 

.Equ 

10. 

ComFormFeed 

.Equ 

oc 


or- OA 


-S that caused it 
the current file 


My ConsDri' 


But + er 


.Equ 


HostWA 
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5 All the stuff for the clipboard. !"his must be in order 

; _ as it is cleared as one_ block of 515 bytes, 

kl ip Board .Equ Buffer+80. 

5 KBHigest is not consistant between applications; 

? WPs The count of items on the cl ipboard 

; DB: The highest place used, values from 0 - 255. (0: 1 place used) 


KBHighest 

* Equ 

Kl ipBoard+512. 


KB Type 

* Eau 

■KBHighest +2 

; Type of data L C T or M 

? 

End o-f 

what must be in order 


CurrFNo 

.i cCjU 

KBType+1 


g 

Stuff for organizer, 12 items 

on desk . 

DTCurOpen 

.Equ 

CurrFNo+ 1 


DTCtOnDesk 

.Equ 

DTCur0pen+l 


1 

i he f 1 1 

e that is actually open 

an the desk , 32 bytes 

DTFName 

.Equ 

DTCt0nBesk+l 


BTFType 

.Equ 

D i FName+2 1 . 


DTFStatus 

.Equ 

DTF ! ype+ 1 


DTPPicked 

.Equ 

DTFStatus+i 

i Boolean? Picked for sav 

j T t S 1 z ek 

.Equ 

DTFF'icked+1 

; 1.3 changed to 2 bytes 

DTFAd dress 

.Equ 

DTFSizek+2 

5 Bank address if not curr 


DTFF'ointers 


Pointers to the bank switched places where the up to 
12 files are stored. When one is removed, all higher 
are moved down so that the n that are in, are contiguous. 
Leave the first unused, so that accum will point right 
. Equ. D 1 FName+ 32 . 


Fiel dName 

Foundbpace 

HardPathName 


.Equ DTFPointers+26 . 

.Equ Fiel dName+21 . 

.Equ FoundSpace+1 

Prodos DSSSOOOO device number. If non zero, use this 
to find a file catalog SOS value 01 to 06, location of 
file cat . 


ham Path Name .Equ HardPathName+1 

? If HardPath is 0, then use this 
: Pathname. If Hard <;■ 0, then 




; this i 

3 

just for display 

j Where we 

keep the stack 

of routine names 



Curr Hods 

.Equ 

MainPathName+32 . 



Stack Pi 

.Eau 

CurrMode+21 . 



StackF‘2 

.Equ 

Stack PI +21 , 



Stack Pd 

.Equ 

St ack P2+ 1 26 . 



NewF 1 1 e 

.Equ. 

Stack P8+21 . 



Newstr 

.Eau 

NewF i 1 e+ 1 



01 dStr 

. Eau 

NewStr+128. 

a 

? 

Max length 127. 

OneChar 

.Equ 

01 dStr+128. 



OrglnMem 

.Equ 

0neChar+l 

5 

Organizer in memory 

RacPDNo 

.Eau 

OrglnMem+l 



ft 2 

.Equ 

RacPDNo+1 



ft 3 

.Equ 

R2+2 



SavedHor 

.Equ 

R3+2 

5 

MUST be Her , then ver 

O Ci V fie G 1 V S P 

.Equ 

SavedHor+1 



SegNum 

.Equ 

davedVer+1 

? 

SOS only segment number 

SMAddrO 

.Equ 

SegNum+ 1 



WVVAddr 

.Equ 

SMAddrO+2 



WWCount 

.Equ 

WVVAddr +2 



Vert Tab 1 e 

< Equ 

WWCount +2 

J 

X, Y, Length, entries 0 

VTHighest 

.Equ 

VertTabl e+93 . 

s 

Highest entry in table 

Work 2 

.Equ 

VTHighest+1 



Work 3 

.Equ 

Work 2+ 2 






Environment record 


tart mg file ca 
YOU HAVE TO 

THE INITIAL VALUES FOR ALL OF THIS 


IF AN f OF THIS CHANGE j , 


ne ] and p r i : t s e ... . 
-HANGE bhGF'R , WHICH LUNfAlNS 


EnvRec 

» tcju 


Work 3+3 



ERHardPa t h Name 

.Equ 


EnvRec 



ERfla i n Path Name 

.Equ 


ERHardPathName + i 



ERPtrCount 

.Equ 


tRMainPathName+3 

'jL - 

• 0-1 

EROAWPrinter 

.Equ 


ERPt r Count +i 


; U~3 

ERMainPr inter 

.Equ 


ERQAWPrinte^+l 


; 0-3 

ERCurr Pr int sr 

.Equ 


ERMamPrinter+i 



ER ! odav 

. Equ 


ERCurrPr inter+ 1 



ERF i ] ] erl 

r~_. . 

■ equ 


ERToday+9 ; String 

Norma 1 1 y C I 3 SON 

; The following is repea 

ted t 

hree times 




ERF f. /-Name 

.Equ 


ERF i 1 I erl + 10 . 



ERDriverName 

.Equ 


ERPtrName+16 . 

*) 

Nada on //e. codes 





* 

to in it port on //c 

{ Next says spec rules f 

or / / 

c (c) , //e 

(e) , or on disk 

(d) 


ERSpecOn 

.Equ 


£RuriverName+15 . 


Where custom made . 

ERDev iceNo 

.Equ 


ERSpecOn+1 


Or slot or FF (disk 

ERPtrType 

.Equ 


ERDev i c eNo+ 1 



EROptions 

• Equ. 


ERPtrType+ 1 

» 

Bool ear. 

ERF' ! aten 

.Equ 


EROpt ions+1 



EnvRecEnd 

.Equ 


ERF'trName+ 106 . 



5 tna of environment rec 

ora 





5 So other segments can 

get p 

ast the snv 

uronment record 

on 

d i sk 

EnvRecLength 

.Equ 


EnvRecEnd £ n v Rec 



DiUULength 

.Equ 


300 ; 

Sps 

ice saved in S&Q«pr 

5 Variables that specify 

curr 

ent ( Organ i 

zar) file card, 

and 

p os it i on i 

; of its top left corner 






OFCNumber .Equ 

tnvfte 

cEnd 





DFCHorPosn 

DFCVerPosn 


. Equ Df CNumber+ i 

.Equ DFCHorPosn+1 


Hor posn of left side 
Incluedes preceding 2 sp. 
Vert posn of top left byte 


>1 

Boo 1 ean 

wn ether cods is 

coming from Profile 

CodeOnFive 

.Equ 

DFCVerPosn +1 

; Initial is zero (false) 

C lock Byte 

.Equ 

Cod eOnF i ve + 1 

; Byte at 0BF06 (ProDOS clock) 

CbWVal ue 

.Equ 

Cl ockByte+1 

; 2 bytes, value of 36,37 at entry 

Cl earing 

.Equ 

CSWVa 1 ue+2 

; Boolean, ReadKB is for ClearTA 

F'rSl ots 

.Equ 

Cl ear ing+1 

; //e, slats 0-7 valid for pr . bool 

DidSwapDisk 

.Equ 

F'rSl ots+8 

1 Boolean, data disk in drive 1 

Fi oppyList 

.Equ 

DidSwapDisk+1 s 

For ProDOS, list of drives, like 60 

EO . 

i_astDBPr inter 

. Equ. 

FI oppvList+6 

; For SOS; first byte is highest dr 
; like X'02', and remainder is not 

LastWPPrinter 

.Equ 

LastDBPr i nter+ 1 


LastSSPrinter 

.Equ. 

Las t. WPPr int sr + 1 


Today 

.Equ 

.Equ 

LastSSF'rinter+1 


SI ink Ada r 

1 oday+20 . 

f Value for X reg . , from BFFS 

SI in'kSl at 

.Equ 

SI inkAddr+l 

ConsDevNum 

.Equ 

SI ink 31 ot+i 

, PR0BABL Y AVAILABLE. • 

I sLc i ! y 

.Equ 

ConsDevNum+1 

j RamDisk driver 

stidres 

s and device number 

Ramp i sk D 

a lQU 

IsLol 1 y+1 


KamD i sk ■ 

.Equ 

RamDisfcD+2 




; Routine for 

when desktop is full 

tBitch 

.Equ 

RamEt i sk N+ 1 

F'EChar 

.Equ 

DontBitch+1 

KDTAvai 1 

.Equ 

PEChar+1 

S'i inkflin 

.Equ 

KDTAvai 1+2 

31 ink Shifts 

.Equ 

SI inkMin+1 

StrWorkS 

.Equ 

SI inkShif ts+1 

KBWidth 

.Equ 

StrWork5+6 

My IB 

.Equ 

KBWidth+I 

SegOO Type 

.Equ 

My IB +2 

: ypeahead f 

or Appl e . 

f/e 

T A Are a 

.Equ 

SegOOType+1 

TALength 

.Equ 

24. 

TANex tin 

.Equ 

TAArea+TALengt 

TANex t Out 

.Equ 

TANextln+l 


— End of tile. 3 


5 Char -for bottom line. 

; 1.3 Word; Last. K bytes available. 

; 1.3 Size of slinky blocks. 

; 1.3 How many times to rotate on Slink 
; 1.3 6 bytes from Word2Str 
; o n- on i y so tar. 

; 2 bytes, Cortland 
; J. byte, which segOO loaded 
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— FILE. 5 


Host Documentation 


; Documentation of permanently resident AppleWorks routines. 


CALLSEG 


; Routine to load segments. READ IT, you Hi like it. It keeps track of 
; which Main is in, and whether or not Organiser is in. As segments are 
5 loaded from disk, it tries to store a copy in bank -switched . If still in 
? bank-switched at the next call of this seg, then the copy will come from 
; bank-switched. Mucha faster, of course. 

5 Also of interest is that this works differently for my testing, as opposed 
5 to the distributed software. Testing reads individual segments from disk. 

1 Distribution reads segments 01-43 from a single file, seg.mn. Location in 
, seg.mn is a series of three bytes pointers at the beginning of seg.mn. See 
j program /p2/myasm/combine for how this is built. 


CC2S 

? Routine to concatenate two strings. First string has second added at end . 


CLEARDA 

? Routine to clear the window within the display area. Clears from PageBegin 
; to F'ageEnd 


CLEAR i A 

j Routine to check the typeahead and see if anything waiting. Sets switches 
; including FoundEscape ,FoundSpace and FoundReturn. 


CLEARWINDOW 

? Routine to clear a specific window. Clears all columns from row X to row Y . 


Count lA 


l Counts the number of 
i accum , whether there 


characters in TypeAhead. Returns true or false in 
are any. Book Host 2 . Console driver. 


• aq t 



ConsDr i ver 


Puts (accum) characters , pointed at fay CDAddr , 
characters are less than space Cx'20') they are 
in the Device drivers manual for what they do. 
different for the //e. 


out to the console. If 
control characters. Look 
Note that the Equates are 


ConvlTP 


Routine to convert accumulator to printable 3 digit number with prec blank 
; Result goes into accum, X, Y , and into St r Work 3 . Preceding zeroes are 
; changed to blanks. 


D i eNow 

; Locks up the system, and stores error information. 


DoBe 1 1 

; Rings the bell. Returns condition code of non-zero (BT will pick it up), 

DoGoT oXY 

I Moves the cursor to col umn X , row Y on screen , 


DoHe 1 p 

; Writes 0A-? for help on bottom of screen. 


Enter Comma, rsd 

; Puts something like "Enter your command" on bottom line, left side. 

Fu 11 Ex i t 

I FullEx.it calls Organizer . Get 
; "Main" routines. Have to come 
3 at the conclusion of the Main, 
caller in Organizer, 

GetScrLi ne 

5 Routine gets a line from the screen. Input: accum has line number. 
; Output 5 80 characters at FileBuf+256 thru FileBuf +256+79. 


here at beginning, and also returning from 
here because Organizer may not be in memory 
Some “Main" calls return directly to the 


Page 16 



Ge i Ar- gs 


5 Get a variable number of arguements from bytes past the JSR. Accum will 
s have number of bytes to pull. Updates the return address by number of 
; bytes. The pulled bytes go to AArg , AArg+1 , etc. 


Ge tUBar 


; GetVBar lets the user pick an item from the numbered items now on the 
; screen. The user can move the number bar by using the up and down arrows. 

; Accum at entry has the starting number. It will almost always be 1, unless 
; the program is smart enough to remember what should be used. Returns in 
; accum the number picked, or zero if escape was pressed 


Hi ghLi gh t 


5 HighLight inverses characters that are already on the screen.- This is used 
; by deletes, moves, etc. and y have screen posn, Accum has number of 
5 bytes. Accum may be zero, which will just remove all inverse from the 
5 line. Always does whole line. 


IODisable 


; Far the //s only. Prevents 10. Not needed on MAC. 


I OEnabl e 

; For the //e only. Allows disk 10. Not neededd on MAC. 


Hake IB 

; Clears the screen, writes top and bottom solid lines , file name, escape 
; road map . 


MadeAChange 

i MadeAChange posts tne changed flag on current file. 


Mu 1 1 By t e 


; Actual multiply routine for register X times register r into MPEG (two 
s bytes) 


Mu! tWord 

, Routine to multiply two words. Addresses follow the JSR Mu! tWord . Result 
; in HReg (4 bytes) 


5~« - — -i "7 
i ciQ tr i i 



My Let tRtn 



MyRigntRtn 


t o 


Pop Stack 


Ksnio v e s c u r r e n t 


. tsm 


map 


HP 1 


ays i t 


PI easeEnter 


Pressftny 

; Routine disci ays "Press any key to continue" 


Print 

5 00 in accum 
: FE in accum 




output a carriage returr 


Push Stack 

5 Routine to push the 
3 new string that g o e : 


escape roadmap , adding a new string 
into the stack 


-a i ^ argusiTiH 


Re ad KB 

\ Gets one byte from the keyboard . Leave it in ’accum. 


Rest Cursor 

\ Routine to restore 
3 Writeuom . SaveGo i 


cursor 
oXY can 


it was after th 


Say e uoT oXY 








! if il- 



SetUCC 


ert accumulator to upper case, not toe tough., 

SetUCS 

j Convert a string to upper case. 

StrCmpRtn 

; Routine to compare two strings. 


StrMvRtn LDA #4 

; Routine to move one string to another,' 


StrWrRtn 


; Routine to write a string at coordinates given. 

: Returns has Hor and Vert, Return* has string address. 


TestKB 

; Routine checks keyboard. It it finds anything, places in typsahead, 
: like to ring bell when full, but this Would be recursive and kill me 


Wa i t 

; Routine to wait (accum) tenths of a second. Just 


Ufi peOutTA 

; Routine to clear the type-ahead. 


Wr i tiByte 

; Write character in register X at current cursor position. Move the c 
; one to the right after. 


Wr i teCom 

string at 0,23. Saves the next available cursor position 
by RestCursor . 


j Writes the 
; future use 


Page 1? 


Woul d 


ursor 


for 


vBarWrRtn 


; Writes a string at the given cursor position. Numbers it, and displays the 
; number ahead of it. Saves location, length, and number tor subsequent use 
by SetVBar . 


Wr i t e 


5 Writes the string at wherever the cursor is now. 


Wr i tProp 


; writes (register Y) character on screen (register ;<) times, 
s Examples. ~ BO 


Wr i tsEUSure 

; Write "Are you sure" Question mark will be placed by Set YN . 

— End o-f file, ,5 
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FILE , 6 


Host Entry Points 


! i ness are references to the routines in Host 


ii vl) r-. j . w 

•IMP 

q Sk 1 P 

, Byte 

A But t er 

.Equ 

ACa i 1 Seg i ab 

.Equ 

B4ReadTest 

.Equ 

At Readiest 

.Equ 

B4WriteTest 

.Equ 

B4E1 emsl est. 

.Equ 

e Var l ab i es c 

ommon to 

StrWork3 

.Equ 

HainlnHem 

■ Equ 

[ ask laol e 

.Equ 

PrevSegLoad 

.Equ 

Cal 1 SegTab 

.Equ 

CBy t e 

.Equ 

CodePathName 

.Equ 

StrikeOver 

. Equ. 

CursorOnSw 

.Equ 

LeaveAl one 

.Equ 

ChUnderCur 

.Equ 

SaveE 1 

.Equ 

AskforProg 

.Equ 

Cal 1 Seg 

.Equ 

CC2S 

.Equ 

L i earDA 

.Equ 

Cl ear TA 

.Equ 

Cl earWindow 

• Equ 

ConsBriver 

.Equ 

ConvlTP 

.Equ 

BieNow 

. Equ 

Di vWord 

.Equ 

DoBel 1 

.Equ 

DoGoToXY 

. Equ 

DoHel p 

.Equ 

DTT estAvai 1 

.Equ 

DTIsFui 1 

.Equ 

Enter-Command 

.Equ 

Ful lExit 

.Equ 

GetScrLine 

.Equ 

GetArgs 

.Equ 

GetVBar 

.Equ 

HighLight 

.Equ 


ftei oc ate 
Vers i on 

HostLocn+4 

ABu-f-fer+2 

Aca i r ijSs i ab f i 
B4Rsad i est+4 
At Readiest +4 
B4Wr 1 1 eTest +4 

1 routines 
B4E1 emsTest+4 
StrWork3+4 
MainlnMem+l 
Task Tab I s+4 

PrevSegLoad+1 

Lai 1 Seg rab+F‘osBegsX4+4 
CByte+1 

CodeF‘athName+30 . 
StrikeOver+l 
CursorOnSw+i 
LeaveAl one+2 
ChlinderCur+1 

SaveE 1+1 
Ask F or Prog + 3 
Call beg +3 
CC2S+3 
C"! ear DA+3 
Cl earTA+3 
Cl earWindow+3 
L or i sDr i ver+ 3 
ConviTP+3 
D l eNow+ 3 
D i vWord +3 
DoBel 1 +3 
DoSoToX’f+3 
DoHel p+3 
DTTest Aval 1+3 
DTIsFui I +3 

EnterCommand+3 ; Z is to 

FullExit+3 

GetScrLine+3 

GetArgs+3 

G e t V B a r + 3 


see i f 


cal ! s d anywhere 


-age ,11 


Host bn try Points 


— continued from previous page 


IODisabl e 

• Equ 

HighLight+3 

IOEnabl e 

,Equ 

IODisabl e+3 

Mak e I B 

.Equ 

IOEnabl e+3 

MadeAChange 

.Equ 

MakeIB+3 

Mul tByte 

.Equ 

MadeAChange+ 

Mu.l tWord 

.Equ 

Mul tByte+3 

MvLef tRtn 

• Equ 

Mul tWord+3 

MvRightRtn 

.Equ 

MvLef tRtn +3 

PopStack 

.Equ. 

MvRightRtn+3 

PressAny 

.Equ 

PopStack +3 

Print 

• Equ 

PressAny+3 

PushStack 

.Equ 

Print +3 

Read KB 

.Equ 

PushStack +3 

RestCursor 

.Equ 

ReadKB+3 

baveSo i oX i 

-Equ 

RestCursor+3 

SetLICC 

.Equ 

SaveSoToXY+3 

SetUCS 

.Equ 

SetUCC+3 

StrCmpRtn 

.Equ 

SetUCS+3 

StrMvRtn 

.Equ 

StrCmpRtn+3 

StrWrRtn 

.Equ 

StrMvRtn+3 

Trap 

.Equ 

StrWrRtn+3 

VBarWrRtn 

.Equ 

Trap+3 

Wait 

.Equ 

VBarWrRtn+3 

WipeOut'T'A 

.Equ 

Wait+3 

Write 

.Equ 

WipeOutTA+3 

Writ 1 Byte 

.Equ 

Writ e+3 

WritePE 

.Equ 

Wr itIByte+3 

WritPRtn 

.Equ, 

WritePE+3 

WriteCom 

.Equ 

WritPRtn +3 

WriteRUSure 

.Equ 

Wr iteCom+3 


End of file, 6 
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FILE. 7 


Bub-host Documentat i on 


; Book SubHost contains many o-f the host routines. 


SMCount Avail 

t SMCount Avail returns accam with count of K-bytes still available in the 

£ pOul 


SMGetCel 1 

; SMGetCel 1 returns Newstr with the contents of a specific cell of a specific 
■ :: ne / j e ■ ast . 

; 1. Address (bank pointer) for this record. 

; 2. In accum, category, or column, number, 

j Returns Newstr with contents of area', 

; Returns true or false whether Newstr has anything. 


SMGetBl ock 

; SMGetBl ock gets a block of information from memory pool. 
£ 1. Address of a bank pointer. 

; 2. Where it goes in work area (Actual). 

; CArg is returned with number of bytes gotten. 


SMGe tStr i ngs 

; SMGetStrings loads work area with string data, and CRSF'T with the addresses 
; of these various strings. Accum has number of fields wanted. If data has 
; too many strings, ignore remainder. If data has too few, fill the 
: remaining pointers with zeroes. Data ends with FF byte, 

; 1. Address of a bank pointer. 

£ 2. Where the pointers go (Actual), 

j 3. Where the strings go (Actual ) , 


SMPutBl ock 

? SMPutBl ock puts a block into the memory pool , If possible, uses previous 
; address in pool. Otherwise pel eases the previous address. 

; i. Address of a bank pointer, 

; 2. Address of area to store (Actual). 

; 3. Length (bytes) of area to stores CArg. 

j Returns : New address in pool in whereever parm 1 points, 

; Returns s True or false, able. to do it. 

; This ain't gonna be fun on the //e. 


SMPu tCe 1 1 

; SMPutCel 1 replaces the contents of a specific cell. This is used only by 
£ the spread sheet, during recalculation and adjust entries. 

; 1. Address (bank pointer) for this record. 

5 2. In accum, column, number. 

3, Newstr must have new data for cell. It must be the same length as 
; the current contents of the cel 1 . 


SMPu t St r i ngs 

; SMPutSt rings puts string data into the memory pool , # of fields in accum. 
£ If possible, uses previous address in pool. Otherwise releases the 
; previous address. 

; i» Address of a bank pointer. 

; 2. Address of pointers (Actual ) . 

; Returns: New address in pool in whereever parm i points. 

: Returns; True or false in accum, 

; Fun, o fun , on the //e . 
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SMRe 1 E' i ock 


j SMRel Block releases a block. 

; i. Address of a bank pointer. 

; Since the address is no longer valid, it is cleared. 


SMRe turnS i ze 

; SMReturnSize returns CArg containing number' of bytes 
; the specified area. 

; 1. Address of a bank pointer. 


Re 1 ease KB 

} Re I easeKB goes through the kl ipboard and frees up any memory that is in 
; use,, Watch out for DO or more in second byte, means Typewriter formatting, 
; not bank switched address. 


Con vi i Dec 

; ConvlTDec converts accum to 'xx.x inches in Newstr . 


Di spEsc 

; Routine to display Escape situation, and Help into. 


DispFE 

; Routine to display function (centered, top line of screen) and escape map. 


DispFR 

i Routine to display file name, if any, on top left line of screen. 


DivUord 

s Routine to Divide two words. Addresses follow the JSR DivWord. 
; Argss A (First) divided by A (second) , Result in MReg . 


6e tStr 

; Routine to read a string. Max Length is in Accum. 
: Returns FoundEscape, FouncCommand , FoundReturn . 


Ge tMenuBar 

; This is quite a little routine to do in versed menu bars. Let the user 
; select an item by typing its NUMBER, or pressing return when the- item is 
; highlighted. Use arrows to move highlighting. MBF means Menu Bar 
: processing. Upon exit, capitalize the select one. 

; Following comes from call 

MBPEscape .Word ; Where to go if escape hit 

MBPCount .Byte ; Number of params 

MBPOptData .Word ; Addr of description 

MBPOptRtn .Word _ ; Routine to process this opt. 

•Block 28. ; 7 more options, 

•Block 5 • ; Buffer space. 


Set Dec 

; Routine to get a number between 0 and 25.6. Pack into one byte (accum) . 


be tNum 

; Routine to get a number. Accum has maximum permissible value. Returns in 
; accum. Zero means that escape was found. 
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Se tYN 

■a--.. ■//':. Isri i.:~. accum means escape* 


FuS 

R to id DC >i . . . .. ... ■ j ■; • ■ • string. First string 

' must be upper case , second can be upper/ 1 ower . It w 1 1 : match upper against 
; lower, etc. and still find equal. Stolen from Leventhal Page 357. 

; Improved as needed. 

; Accum has (starting position-1) in second string — usually zero. 


Si R 

Routine to convert a two-byte integer into printable. Result in Newstr , 

5 left jusif ied. Length of Newstr is -from 1 to 5, depending on the number of 
i significant digits. Watch it, it is tricky and fast and tight. 


UndoHe 1 p 

; Routine to undo the help- on screen. Puts K available on screen. 


Ver i f yDe lets 

; Ver if yDelete outs a box on the screen warning the user that something big 
i is about to be killed. Asks for a yes/no response. 

— End of file. 7 


Page 


FILE. 8 

Su fa-Hos t Entry Po i n t s 


; These are ref 

erences 

to the routines in 

Sub Host 


SMAvai 1 Count 

.Equ 

LSubHost+2 

3 1.3 name 

changed 

ietB 

.Equ 

SMAvai ] Count+3 



SMGetCel 1 

.Equ 

SMSetBi ock +3 



SMGet St rings 

.Equ 

SMGetCel 1 +3 



SMMaxCol 

• Equ. 

SMGet Str i ngs+3 



SMPutB i ock 

.Equ 

SMMaxCol +3 



SMF'utCe! I 

.Equ 

SMPutB! ock +3 



SMF'utStrings 

.Equ 

SMPutCel 1 +3 



SMRel B1 ock 

• Equ 

SMPut St r i n g s +3 



SMRetBS ice 

.Equ 

SMRel B1 ock +8 

■ ; 1.3 Name 

changed 

SMRetWPSiza 

.Equ. 

SMRetBSize+3 

? 1 .3 Name 

changed 

ConviTDec 

.Equ 

SMRetWPSize+3 



0 i spEsc 

.Equ 

Convi TDec+3 



DispFR 

.Equ 

DispEsc+3 



DispFE 

.Equ 

QispFR+3 



Get Dec 

.Equ 

DispFE+3 



GetMenuBar 

.Equ 

GetDec+3 



GetNum 

.Equ 

Get Men uBar+3 



GetStr 

.Equ 

GetNum+3 



Get YN- 

.Equ 

Getstr+3 



F'OSN 

.Equ 

bet YN+3 



Re I easeKB 

.Equ 

PDSN+3 



WordZStr 

i lL CJ LI 

Re! easekB+3 

; 1,3 name 

c h i an g so 

UndoHel p 

■ Equ 

Word2Str+3 



veri+yDel ete 

.Equ 

UndoHel p+3 



FirstEmpty 

.Equ. 

ver 1 1 yDe i ete+3 

; Tv-jo bytes 



— End of file. 8 


LZ 36Bd 


•qtq Ajjpa aqq qas noA qt pajouBt aq him joqainumaae aqq ut 
jaqapjpqa aqq -jaap st qtq AJjpa aqq qpqq sjns a>jpuj ‘joqe p-iumaae sqq ut 
jaqapjpqa aqq ssaaojd oq suotsjaA asaqq quew noA qj "qtq Ajjpa aqq qsaq 
1 1 tm ‘ o ’ Z * Butpn put qou qnq ‘jaqqp s^jo^a \ day qo suotsjaA [ ).y sONINiMI 

jog ■ sAaq aqq uo ssajd noA p jaq noq jaqqauj.au ‘pajouSt 
aq oq jaqapjpqa g-iojquog aqq sasnaa o'Z uctsjeA oq pappp ajnqesq stqq 

•qsaqpeayqy qe noA oq >ppq 
qqfi-t j papueq aq i [tm qsaqppay^g qa peptAQ.jp noA sjaqapjaqa qpqq qno qaqpft 

■ umop sew Aa>| s|ddy usPq aqq qpqq aqaatput oq pasn si jaqapjpqa qaaa uo 
qtq 08$ a Mi “Aiibujjou passaaojd aq him ‘ojaz qou qt ‘ joqa inujnoaa aqq ut 
jaqapjpqa aqq * pjquoa sutb 6 bj sqjowa [ddy uaqw "aajnos Aub uiojq jaqaajpua 
a ppaj seq qt jaqqp uoxqpaot stqq oq ygf i {. tm sqjofiie i ddy sqsaqpaayqy 


•Motaq paquaumaop si qj "jaqqnq ppaue-adAq 
aqq ut sjaqapjaqa soap upo no a ■ paqdtueqqp st qsaqpaaytrg ajoqaq passaaojd 
aq j.[im jaqqnq stqq ut sjeqapjpqa Auy "jaqqnq peaqB-adAq b spq s^jOMa[ddy 

- pjpoqAaq aqq cuojq bujpo qt qt sa passaaojd aq [ i im ‘ojaz qou 
qt * joqp [nuinaap aqq ut jaqaBJBqa aqq ‘ [ojquoa sutaBaj s>jjojV)a pay uaqw "ygf 
aqq ajoqaq paojaz aq [ [ im joqe pujnaaa aqj_ ■ pjpoqAas) aqq tuojq jaqapjpqa 
B ppaj oq ButAjq ajoqaq uoiqaaoi stqq oq ygf t ftM sufjOM© iddy ! qsaqpaay^g • j 


■quBqjodujt ajp joqppujnaaB aqq qo squaquoa aqq * saspa atuos uj ■ paqoAUt 
ajp siqooq aqq jaAauaqw apouj uoiqp[nuja a// apdy ut aq iixm jaqndu/oa aqq 


■sauiqnoj jnoA 

oq ygf jo y^f oq suotqpaoi asaqq aBupqa up a noq * a6pqjB6 qo saqAq asjqq Aq 
paMO [ i,o q gqy u “ A i ibujjou pup s saqAq jrtoq si qaeg „* •jqsoq,, a[tq apoa aajnos aqq 
ut jpaddp s:*ooq asaqq * wa qsAs * s >j jom j dy 0 ‘Z Ul sqooq qo uotqpquaumaop st stqq 


s mo op s u i q noy n * 3 s >j Jon® [ d ay 


t?‘31IJ 



B4WriteTest : AppleWorks will JSR to this location b e-fore processing 
console driver commands . At entry the accumulator will contain a count of 
the number of bytes to be processed by the console driver. When AppleWork 
regains control , the accumulator must contain the count, which you may 
change. If you change the count to sera, the console driver will do 
nothing . 


Zero page Word CBftddr has the address of the first byte to be processed by 
the console driver. You shouldn't change the characters to be processed , 
but you can change the zero page word to point at different characters in 
your work area . 


Various hex 
driver, and 
HorShif tVP . 


values less than $20 have special meaning to the console 
are listed in the file iall /common as ClearLine through 
There are many similarities to the Apple /// ".consols" 


ariver . 


B4E1 emsTest ; AppleWork 5 will JSR to this location before making calls to 
the SANE elementary functions package. 


The type-ahead buffer is defined in all /common. It is 24 bytes, and you 
can add to it at any time. 

d TANextOut have values from 0 to 23. If they are equal , then 
the type-ahead is empty. TANextln is an index to the next position 
available to store another character in TABuffer . TANextOut is an index t 
the next character to be provided from TABuffer. 


— FILE. 


Desktop Manager Entry Points <2.1 LAN c ode > 


; File of references to 

Organizer 


j 

Equates 

for al 1 segments 


DDR 

.Equ 

FBR 

i 0D0 

IQMustOo 

.Equ 

ZP+0D4 

; Boolean 

RWRef No 

.Equ 

ZP+0B5 


LDDEntry 

.Equ 

-i A 


DDDBType 

.Equ 

19 


DDWPType 

.Equ 

1A 


DDSSType 

.Equ 

IB 


AskForData 

.Equ 

LOrgMam+2+3 


AskPathName 

.Equ 

AskForData+3 


Bui 1 dPref i>: 

.Equ 

AskPathName+3 


LhangeF C 

.Equ 

Buil dPref ix +3 


C 1 oseAF i 1 e 

.Equ 

ChangeFC+3 


ConvH2F‘C 

.Equ 

Cl oseAFi 1 e+3 


Displ ay2S0S 

.Equ 

ConvH2F'C+3 


DrawFi 1 eCard 

• Equ 

Disp ! ay2S0S+3 


FCList 

.Equ 

r a *jF eCa . +• 


Hittingl2 

.Equ 

FCList +3 

f NOTE THREE BYTES AVAILABLE. 

LoadDied 

. E q u 

Hittingl2+3 


Msg Max Rees 

.Equ 

LoadDied+3 


Open Input 

.Equ 

MsgfiaxRecs+3 


ProvName 

.Equ 

OpenInput+3 


ReadVar 

.Equ 

ProvName+3 


SI otCl rCurr 

.Equ 

ReadVar+3 


SI otFrCurr 

.Equ 

SI otCl rCurr+3 


SI ot2Curr 

.Equ 

SI otFrCurr+3 


SI otFrWork 

■ Equ 

SI ot2Curr+3 


b’l otZWork 

• Equ 

SI otFrWork+3 


SI otPoint 

.Equ 

SI ot2Work+3 


SOSJustL i ose 

.Equ 

SI otPoint+3 


a'0&2u i sp i ay 

.Equ 

SOS-Just Cl ose+3 


WrapF i 1 eName 

.Equ 

S0S2Displ ay+3 


WrRel 2Card 

.Equ 

WrapFi 1 eName +3 


? First the mai 

n entry 

; Reg X has cal 1 parameter 

AFi 1 eBuf 

.Equ 

Wr-Rel 2Card+3 


; Note 36 bytes 

avail ab 1 e af ter Pref i x . 


Pref ix 

.Equ 

AF i 1 eBuf +2 

; 50. bytes 

RWFirst 

.Equ 

Prs-f i x 4-86 n 

1 To maintain location 

EndFi 1 eBuf 

• Equ 

RWFirst+1 



DDBot 

.Equ 

EndF i 1 eBuf +2 

DDTop 

.Equ 

DDBot +2 

DDTopT 

.Equ 

DDTop +2 


— continued next 


Ps. 




page 


'• e ‘ ' / 


i; Work area t or 

one entry 

from my internal disk 

directory 

DBName 

a £ Cj U 

DDT op ! +2 


DD1 yp© 

. Equ 

DBName + i 6 . 


DBS i z eK 

.Equ 

DDType+i 

? 1.3 changed to 2 bytes 

DDBate 

.Equ 

DDSizeK+2 


DBF i eked 

.Equ , 

u u Date+4 


•s 



J 1 -3 One spare bvte -removed 

FCLLoaded 

.EQU 

BDName+LBDEntry 

5 1,3 This doesn't change 

1 ocn . 

FCLPicked 

.EQU 

FCLLoaded+1 


APickMsg 
pick " 

.Equ. 

FCLPicked+1 

s Address of "Use arrows 2 

QDSavesw 

.Equ 

APickMsg +2 

Doing 3u :k 'n )irt y S av 


Work area 

for loading files from 

BS 

WBTFName 

.Equ 

QBSaveSw+1 


WDTFType 

.Equ 

WDTFName+21 . 


WDTFStatu's 

.Equ 

WBTFType+1 


WDTFPicked 

.Equ 

WDTFStatus+1 

; Whether picked for save 

WBTFSizK 

.Equ> 

WDTFPicked+1 

; 1.3 two bytes 

WDTFAddress 

.Equ 

WBTFSizK+2 

; Bank address if not curr. 

WorkFi 1 eName 

.Equ 

WDTFName+32 . 

it 'BE. bytes 


— end at' tile. 27 
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FILE. 1 


Data base Common Work Area 


s Equates and zero page locations tor Data base 


i ask 

.Equ 


u £T i! „ 

J 

ie=, Quick rile 

ha i r i beg No 

.Equ 


1 " 

Ms in is seg . 0 1 

MaxF iei ds 

.Equ 


30. 


MaxKpWidth 

.Equ 


1 SO . 


RptSizaH 

.Equ 


620 . ; 

Bytes for tables style 

RptS izeV 

.Equ 


450 . £ 

For i abel s styl e 

VKLinei 

.Equ 


i 


KAuxBase 

.Equ 


vI'O ij 

Pel addresses .>= are in 

; For report 

t ormat s 

( ! SO f S3 St 

y 1 s ) 


LRptArea 

.Equ 


' 600 « 


LCal cArea 

a Equ 


54. 


; Zero page 

addresses 




BR 

.Equ 

Z P+0 AS 

? 

For tile loading 

CR 

.Equ 

ZF+UAA 


Col umn reg i star • 

HR 

.Equ 

ZP+OAE 

s 

-Just in case 

RR 

.Equ 

ZF'+OBO 




.It 


Language="A‘' 


LomArr ange 

.Equ 


"A ,, +0AKev 


ComCopy 

■ Equ 


'C“ +GAf 


ComDitto 

.Equ 


" ■- "+0AKey 


ComDei ete 

• Equ 


"D"+0AKev 


ComFind 

.Equ 


"F"+0AKey 


ComGroup 

.Equ. 


"G"+0AKev 


Com Insert 

.Equ 


" I " +0AKey 


Com Justify 

.Equ 


"J"+0AKey 


ComCal c'Co‘‘ 

.Equ 


"K"+,0AKev 


ComLayout 

.Equ 


"L"+0AK'ey 


DomMove 

.Equ 


"fT+QAKey 


ComChName 

.Equ 


"1 :“+0AKey 


ComFr Opt ions 

.Equ. 


: t lAi = ■ 


ComPrint 

.Equ 


“P” +QAKey 


ComRecSel 

.Equ 


"R"+0AKey 


ComTotal s 

.Equ 


"T"+0AKey 


ComStandard 

.Equ 


"V"+0A 


ComPrFN 

.Equ 


" V " +0AKey 


Com Zoom 

.Equ 


"Z"+0AKey 


C o (it r A b £ B A C K 

.Equ 


11. +0AKey 


ComPAGEFQRW 

.LOU 


l O ■ + OAk ey 



.Eridc 





.It 


Language="F'' 


ComArrange 

.Equ 


"T ,, +0AKey 


ComCopy 

• Equ 


"0" +0AKey 


ComDitto 

.Equ 


22+0 AKey 


ComDei ete 

.Equ 


{ L ' +QAKey 


ComFind 

.Equ 


“L* , +0AKey 


ComGroup 

.Equ 


,, G“+0AKey 


Com Insert 

.Equ 


" I "+0AKev 


Com Just i f y 

.Equ 


“ J"+0AKev 


ComCal cCo 1 

.Eou 


"K* 


ComLayout 

. Equ 


"X "+0AKey 


ComMove 

.Equ. 


“D"+0AKey 


ComChName 

.Equ 


"N'-’+GAKey 


ComPruotions 

.Equ. 


"O^+OAKey 


ComPrint 

. Equ 


"P" DAKey 


ComRecSel 

.Equ 


"R"+0AKey 


ComTotal s 

.Equ 


“M"+QAKev 


ComSt an d ar d 

.Equ 


"V'+OAKev 


ComPrFN 

.Equ 


"V+OAKey 


ComZoom 

.Equ 


" z " +0AKey 

, 


.Equ 


1 1 . +0AKey 


ComPAGEF ORW 

• Equ 


1 O . +0Ak ey 



• tndc 
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■ If 

Language^S" 

ComArrar me 

• Equ 

,, U"+0ARey 

Com copy 

ComDitto 

.Equ 
■ Equ. 

"K"+0AKey 

22+uAkev 

LomDe l ete 

■ Equ 

“L"+0AKey 

ComF ind 

• Equ 

"F"+OAKev 

ComSroup 

.Equ 

,, 8"+QAR.ev 

com I n serf 

■ tqu 

"h"+0AKey 

Com Just if v 

■ Lqu. 

" J"+DAKey 

ComCa! cCol 

.Equ 

" K " +0AKey 

ComLayout 

■ Eau 

" [ "+uAKey 

ComMove 

.Equ 

"B ,, +OAKey 

ComChName 

■ Equ 

,, N"+0AKev 

ComPrQptions 

■ Equ 

"P" f uARev 

ComPrint 

■ Equ 

"D"+0ARey 

ComRecsa i 

■ Equ 

'‘R"+OAKey 

ComTotal s 

■ Eau. 

"T"+QAKev 

ComStandard 

■ Equ 

"V+OAKey 

ComPrFN 

■ Equ 

"V+OAKey 

Lorn Zoom 

■ Equ 

!! Z"+0AKey 

ComPAsEBACK 

■ Equ 

1 i ,+OAKey 

ComPAG E F 0 R W 

■ Equ 

■ Eridc 

10 « +0Akey 


■ It 

L a n y u. a *3 & 1 : 1 

ComArrange 

■ Eau 

"C+OAKev 

ComCopy 

■ Equ 

" D “ +0ARey 

ComDel ete 

■ Equ. 

"E"+0AKey 

ComDitto 

■ Equ 

z'2+0AKey 

ComF ind 

■ Equ. 

“C'+OAKey 

ComSroup 

■ Eau 

"G fl +0AKey 

Com Insert 

■ Equ 

' "T'+DAKev 

com Justify 

■ Equ 

' J"+0AKsv 

ComCa 1 c Co I 

■ Equ 

" K “ +0ARsy 

ComLayout 

■ Equ 

"L" f-OARey 

ComMove 

■ Eau 

"It'+OAKev 

ComChName 

■ Equ 

"N" +QAKev 

ComF'r options 

■ Equ. 

"P"+0AKey 

Comprint 

■ Equ 

"S"+0AKev 

ComRecbel 

■ tqu. 

"R"+0AKey 

Com Tot a 1 s 

■ Equ 

,, T"+0AKey 

Loiiibta n d a p g 

■ Equ 

"V'+OAKey 

ComPrFN 

■ Equ 

"V'+OAK'ev 

ComZoom 

■ Equ 

,i Z"+0AKev 

ComF'AShfcJAC'K 

■ Equ 

1 39 * 

ComPAGEF ORW 

■ Equ 

■ Endc 

138. 

5 The following 

is the layout c 

f the Quick File work area. The beginning 

r a o o p s s s 1 5 3 o /n £ w h i a t. v a r i a D i a 

until this settles down. 


■ List 


5 

First the items 

that are common between al 1 files 

; Begin the fil 

e header record 


BBHeader 

. hq u 

DBW A 

ASReports 

■ Equ 

DBHeader ; Address of record pointers 

BABARecords 

■ Equ 

A8Reports+16 . ; Bank adr of block of addr. 



; of records 


Now tx’e record 

s one and two, exactly 

Basi cMode 

* Equ 

DBWA+24 . 

CurRecNo 

■ Equ 

BasicMode+1 

CurrRpNo 

.Equ 

C u rftec N o + 2 

FVSequence 

■ Equ 

LurrRpNo+1 

FHRetOir 

■ Equ 

FVSequence+1 

HDCLine 

■ Equ. 

FHRetDir+1 

HDCCol umn 

■ Equ 

HBCLine+1 

Mode 

■ Equ 

HDCCol umn+ 1 

NF l e I ds 

■ Equ 

Mode+1 

NRecords 

■ Equ 

MFiel ds+l 

NReports 

.Equ 

NRscords +2 

PSL 

■ Equ 

NReoorts-f 1 

I 

■ Equ 

PSL +2 



Page 32 



/ 


FHHor 
r HF 1 s ! d 
FVHor 
FWer 
FVFiel d 
FHFields 


Se 1 ec t On 
Sel ectTest 
Se! set Con t 
Sel ectBata 
Fill erl 
FHNames 


B1 dRecWA 
B i dRecTop 


Bl ocks 

of into for up to 30 fields, 

. Equ 

VDCField+i 

.Equ 

FHHor+36 . 

.Equ 

F HFiel d+3£. 

.Equ 

FVHor+36 . 

.Equ 

h Wer+36 . 

.Equ 

FVFiei d+36 . 

c^e . ec t 

data from file. Has to stay 

.Equ 

FHFiel ds+1 

.Equ 

Sel ectOn+6 

.Equ 

Sel ectTest+6 

.Equ 

Sel ectCont+6 

.Equ 

sel ectData+96 . 

.Equ 

Fi I 1 er 1+20 . 

This is 

the end of the exact format 

FHNames 

stored will be same as NFiel 


P ! us some s * acfc 


shown in Past 


area to 5t °ra record pointers, 
• def .tl t . 


ds; 22 bytes each 

1025 for //e , 

1-n are real « 


• Equ 
.Equ 


FHNames+660 , 
Bi dRecWA+1024 


"■ > ■ ' ■ i . . <hil e 

5 to save when closed 


fiis is open, and not important 


CRSF'T 

CurrRpName 

ConvError 

ConvMore 

Date In 

DateSood 

xfiller 

FFSWitch 

FFData 

IsDateF 

I si imeF 

U 5 Work 

Max Length 

Numstr 

NFiel dsX2 

MewStr 1 

SaveCWork 1 

SFDispl ace 

SortL 

SaveFR 

TopRecNo 

WorkPointer 


• Equ 
.Equ 
.Equ 
.£qu 
.Equ 
.Equ 
.Equ 

* E Cj LI 

.Equ 

.Equ 

.Equ 

.Equ 

.Equ, 

.Equ 

• Equ 
.Equ 
.Equ 
.Equ 
.Equ 

• Equ 
.Equ 
.Equ. 


Bi dRecTop 
i 

CurrR'pName+21 
ConvError+1 
ConvMore+1 
Dateln+21 . 
iJatsl-ood+1 
XFILLER+i 
FFSWitch+1 
FFData+32 . 

I sDateF+l 
I si i met + 1 
L15Work+16 . 
MaxLength+l 
NumStr+6 
NF ie 1 dsX2+ 1 
Newstrl+1 
SaveCWork 1+1 
SFDlsp 1 ace+1 
SortL+ 1 
SavsF R+2 
TopRecNo +2 


; Following are not kept on + x T ■ 


Sei ect i ype .Equ 

Sel ect Numeric .Equ 

j. Save selection rules whin 
SaveRacSe! , Equ 

IFCEnd .Equ 


W o r k P o i n t e r + 2 
Sel ectType+6 


in de] mode, or repori 
Sel ectNumer l c +48 . 
w'S veRscbs i +i 14 . 


^Records 5 U * 0 * 2 ?C.. 7350 * 2 ’ de P®gding on whether Slink 


.Equ 


IFCEnd 


present a 


End of f i ! e . 1 



FILE. 35 


Data base uommon work rt~a, Additional 


THE FOLLOWING 

MUST BE 

IN ORDER, AS THEY COME 

FROM DISK * 

RptName 

• Equ 

RWFormat 



RHor 

.Equ 

RptName+20 . 

5 

Horizontal 

RVer 

.Equ 

RHor +36 . 

? 

Vertical 

RField 

.Equ 

RVer+36 . 

l 

Field number for column 




j 

80-82 are cal ced 

RFoat 

.Equ 

RF 3. el d+36 . 

f 

H : $99 no foot total , 




4 

0-4 is decimal places 




5 

Vs Boolean print field name 

RF1 oat 

.Equ 

RF oot +36 . 

t 

y 

Hi $99 not numeric field 




? 

0-4 decimal places 




5 

V i Bool ean f 1 oat 1 eft 

RFiel as 

.Equ 

RF1 oat +36 . 

* 

Fields on reports 

RCCol 

.Equ 

RFiel ds+ I 


Hi 1st Calc col of RField array 




«? 

Vs Screen line hot of page 




3 

Then two more for 2nd, 3rd calc. 

RSTCol 

.Equ 

RCCol +3 

5 

Of FHNames array 

RW l d t h 

.Equ 

RSTCol +1 

3 

Of paper inches XX.X 

RLMargin 

.Equ 

RWidth+1 


Inches XX.X 

RRMarg.in 

.Equ 

RLMargin+1 

if 

Inches XX.X 

RChPerlnch 

.Equ. 

RFlMargin+1 

3 

NN 

RL Paper 

.Equ 

RChF‘erInch+1 

m 

Inches XX.X 

RTMargin 

.Equ 

RLPaper+1 

* 

Inches XX.X 

RBMargin 

.Equ 

RTMargin+I 


Inches XX.X 

RLinesPerlnch 

.Equ 

RBMarg i n+ I 



RSource 

.Equ 

RL i n esPer I n c h + i 

* 

Char New Changed source 

RType 

• Equ 

RSource+1 

? 

Char H or Vertical format 

RSpac ing 

.Equ 

RType+1 

? 

Char S D or T, all languages 

RPrTitle 

.Equ 

RSpacing+I 

n 

Boolean print title block 

R Just Tot 

.Equ 

RPrTitl e+1 

jt 

Boolean Just print totals 

ROmitBl ank 

• Equ 

RJustTot+1 


Bool ean 

RPr IBI ank 

r~ _ , . 

*fc.QU 

ROmitBl ank+1 


Bool ean 

RTitle 

.Equ 

RPr IBI ank+1 


Title line 

RCal cName 

.Equ 

RTitle+82. 

’? 

Max 20, calc name (3 of them. 1 

RCa i cRu] e 

.Equ. 

RCa . l cName+'Z-L . 

V 

? 

Max 30, rules (3 of them) 

RC2and3 

.Equ 

RCal cRul e+32 , 

3 

two more, 54 bytes each. 

RSTF'age 

.Equ 

RC2and3+LCal cArea+LCal cArea 

RF'CC 

.Equ 

RS i Page+1 

3 

Max 13 control char for pr . 

Fit ashes 

.Equ 

RPCC+14 . 

■ 

Boolean print dashes for empty 

nr* !^j 0 1 I 05 

.Equ 

RDashes+l 

3 

114 bytes 

— end of file. 3 

5 
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I- 1 LE . 32 

ua. t 3. Base tn t r y Po i n t s 


; These are the entry points into Main 


AddNum2S 

.Equ 

LDBMa in +2 +3 

Cl ear-CC 

• Equ 

AddNum2S+3 

Cl earF i 1 eHeader 

.Equ 

Cl earCC+3 

ConvS2I 14 

.Equ 

Cl earF i 1 eHeader+3 

CCSel ect 

.Equ 

Conv'321 14+3 

DecDate 

.Equ 

CCSel ect+3 

Dec Time 

.Equ 

DecDate+3 

DispCC 

.Equ 

DecT ime+3 

DispTime 

.Equ 

DispCC+3 

DispDate 

.Equ 

DispT ime+3 

DispRN 

.Equ 

DispDate+3 

Dum'pCRSPT 

.Equ 

DispRN+3 

ExtractN 

.Equ 

DumpCRSPT+3 

Form ICC 

.Equ 

ExtractN+3 

LoadCRSPT 

.Equ 

FormlCC+3 

PointAtNames 

.Equ ■ 

LoadCRSPT+3 

PointAtRec 

.Equ 

Po i nt AtNames+3 

ResetRAC 

.Equ 

Point AtRec+3 

SetCCType 

.Equ 

Reset RAC+3 

Stuff Name 

.Equ 

SetCCType+3 

TryDateT ime 

.Equ 

Stuff Name+3 

TestDtTime 

.Equ. 

TryDateT ime+3 


; Now the 

d 3 . 1 8. 

s! ements 

that are 1 oaded as pai 

DashStr 


.Equ 

TestDtT ime+3 

S' 1 


.Equ 

DashStr+3 

ALONames 


.Equ 

SI +2 

ALCNames 


.Equ 

ALONames+36 . 

Month Name 

3 

.Equ 

A L C N ames+ B- 

— end of 

tile 
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FILE. 33 


Data bass Reoor 

t Work 

Area 


Zero o 

age 1 oc 

Left Margin 

.Equ 

063 

RightMargin 

.Equ 

064 

CurrCol umn 

.Equ 

065 

CurrHor 

• Equ. 

066 

CurrVer 

.Equ 

067 

Let tCol umn 

.Equ 

06B 

VRCurrFiel d 

• Equ 

069 

CurHorFul 1 

.Equ 

06 A 

CurHorScr 

.Equ 

06B 

NxtHorFul 1 

.Equ 

06C 

Menu Item 

.Equ 

06 D 

MadeRPChanges 

.Equ 

06E 

FirstRC 

.Equ 

06F 

OPAsc i i 

.Equ 

070 

0p2Scr 

.Equ 

071 

Qp2HC 

.Equ 

072 

0p2Disk 

.Equ 

073 

Qp2WP 

.Equ 

074 

0p2MM 

.Equ 

075 

OPDIF 

.Equ 

076 


; Location at report format 

RWFormat .Equ LDBSegs 


ALL THE FOLLOWING TABLES MUST BE IN SOME SORT OF ORDER, AS THEY ARE BULK 
;; MOVED INTO THE AREAS. Ma, 512 bytes. 

; Table of spacing intervals for various printers. 

. Values are for thru i? cpi All va ues are based on non-proportional 
; letters taking 8 increments. Values 1 and 2 are for proportional 1 and 2. 
; These are default values. Can be overridden for specific printers. 


PrAreaStart .Equ RWFormat+LRptArea ; Dots per inch for 0-24 CPI 

— end of file. 33 


Data Base Report Ulork Area bn try Points 


; Book RWSegRet 

5 Routines 



DispTop 

.Equ 

LDBSegs+0500+2+ 

HRDispLS 

.Equ 

U X Sp i Qp+ U 

Inch2Chars 

■ Equ. 

HRDispL5+3 

Inch2Lines 

.Equ 

Inch2Chars+3 


Sel F'rType 

.Equ 

Inch2Lines+3 

Sel Options 

.Equ. 

Sel PrType+1 


FILE.? 


ior a adshe 0 t 

Common Work 

Area 

l L- Q flj ffi O r i ?' ' U D. 

tines for S 

preadsheet ? 

MamSegNo 

.Equ 

24. 

Task 

.Equ 

?! ?i 


.If 

Language 3 'h 

ComArrange 

.Equ 

"A"+0AKey 

ComBl a.nk 

.Equ 

"B" 3 IK ay 

comCop y 

.Equ 

" C 11 +OAKey 

ComDei ete 

.Equ 

"D"+OAKey 

ComFind 

.Equ 

"F"+QAKev 

Com Insert 

.Equ 

"I’-'+OAKey 

Corn-Jump 

.Equ 

" J"+0AKey 

ComCal c 

.Equ 

"K"+0AKev 

ComLayout 

■ Equ 

"L"+DAKev 

ComMove 

.Equ 

"M"+QAKey 

ComChName 

.Equ 

" M “ +QAKey 

ComOp t ions 

.Equ 

"C'+OAKey 

ComPrint 

.Equ 

"P' : +OAKey 

Com! it! es 

.EQU 

" T " +QAKey 

ComEdit 

.Equ 

"U +0AKey 

ComStandard 

.Equ 

"V"+0AKey 

ComView 

.Equ. 

“W‘‘+OAKey 

ComZoom 

.Equ 

" Z 11 +OAKey 

KFormSep 

.Equ 

.Endc 

H !l 

* 


.If 

Language 3 " 

ComArrange 

.Equ 

"T"+QAKey 

ComBl ank 

.Equ 

"B"+OAKey 

ComCopy 

.Equ. 

"C'+OAKey 

ComDei ete 

.Equ. 

"E"+0AKey 

ComF i nd 

.Equ 

"L"+0AKey 

Com Insert 

.Equ 

"I"+OAKey 

ComJump 

.Equ 

"J"+OAKey 

ComCal c 

• Equ 

"K"+0AKev 

ComLayout 

.Equ 

" X " +QAKey 

ComMove 

.Equ 

"D"+UAKev 

ComChName 

.Equ 

"N"+OAKey 

ComOptions 

.Equ 

"0"+0AKey 

ComPrint 

a Equ 

::: ' i-xev 

Com r i 1 1 es ■ 

.Equ 

"M l! +OAKey 

ComEd i t 

.Equ 

" U " +OAKe v 

ComStandard 

.Equ 

"V"+OAKev 

ComView 

.Equ 

"F"+0AKey 

ComZoom 

.Equ 

. hOA :e< 

Khormsep 

.Equ 

.Endc 

a - u 

J 


.If 

Language 3 i! 

ComArrange 

.Equ 

"C'+OAKey 

ComBl ank 

.Equ 

"R"+OAKey 

LomLop y 

.Equ 

" K " +0AKey 

ComDei eta 

.Equ 

"L" +OAKey 

ComF i no 

. Equ 

"F"+OAKev 

Com Insert 

.Equ 

"E ,, +0AKey 

ComJump 

.Equ 

“Z"+OAKev 

ComCal c 

• Equ 

"M" +0AKey 

ComLayout 

.Equ 

" [ "+0AKey 

ComMove 

.Equ 

"B"+0AKey 

ComChName 

.Equ 

• T fOAKe - 

LomOpt i on s 

• Equ 

"P"+QAKey 

ComPrint 

• Equ 

"D"+QAKey 

ComTitl es 

.Equ 

"H"+QAKey 

ComEd i t 

B t . '~j U 

"V'+OAKey 

ComStandard 

.Equ 

"G"+QAKey 

ComView 

• Equ 

"T"+OAKey 

ComZoom 

.Equ 

"A”+0AKey 

KFormSep 

.Equ 

»* r » 


Main tor 33 is 


Separates 1 ist 


■-■eoara 


ist 


Separates 1 ist 



items in formula 


items in formula 


items in formula 
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.If 

Languages" I" 

ComAr range 

.Equ 

■'Q“+OAKey 

ComB'l ank 

• Equ 

“B"+OAKev 

... DmC : . ' 

.Equ 

"C’+OAKev 

ComDe: ete 

.Equ 

"E"+OAKey 

ComFind 

.Equ 

"C"+OAKev 

Comlnse ... 

• Equ 

" I "+OAKev 

CofuJump 

-Equ 

"J" +OAK'ey 

ComLal c 

.Equ 

"K"+OAKev 

ComLayout 

.Equ 

"L"+OAKey 

ComMove 

.Equ 

" M " +OAKey 

ComChName 

.Equ 

" N " +OAKey 

ComOpt ions 

. »hqu 

11 p" +OAKey 

ComPrint 

.Equ 

,, S"+OAKey 

Com! itl es 

.Equ 

“T M +OAKey 

ComEdit 

.Equ 

, 'U"+GAKey 

ComStandarc 

.Equ 

v ”+OAk ey 

ComView 

.Equ 

"F"+OAKey 

L'omzoom 

.Equ 

u Z"+OAKey 

KFormSep 

.Equ. 

.Endc 

■' j" ; Separates list items in formula 

l Bits tor 

Work Type byt 

e +0 

BitVal lib 

.Equ 

SO 

BitNDIf Zero 

.Equ 

4o $ Values sol amenta 

BitProp 

.Equ. 

20 j Just for labels 

BitSimVal us 

.Equ 

2o ; Just for values. 

BitProNL 

.Equ 

10 s Labels not allowed 

BitProNV 

.Equ 

S ; Values not allowed 

BitsVFS 

.Equ 

1 ; Bits Value Format Standard 

BitsVFF 

.Equ 

2 5 For val ues 

BitsVFB 

.Equ 

O 

Bit sVFC 

.Equ 

4 

BitsVFF 

. Equ 

cr 

BitsVFA 

.Equ 

6 

BitsLFS 

.Equ 

1 

BitsLFL 

.tqu 

2 ; For 1 abel s 

BitsLF'R 

.Equ 

O 

BitsLFC 

.Equ 

4 

j Bit s f or 

Work Type byt 
.Equ 

e +1 (just for values) 

BitCal ced 

SO 

BitNA 

.Equ 

40 

BitError 

.tqu 

20 

BitChanged 

.Equ 

10 ; This is probably not useable 

\ These are 

internal codes found in internally stored strings 

KIntCoor 

.Equ 

254. ; Next two bytes are XY 

KIntNum 

.Equ 

253. ; Next six bytes are number 

KlntBots 

.Equ 

252= s Replaces ... 

KAUnPl us 

.Equ 

251 . 

KAUnMinus 

.Equ 

250 . 

K'ALParen 

.Equ 

249 . 

KAMul t 

.Equ 

248. 

KADiv 

.tqu 

247. 

KAP 1 us 

. Equ 

246 . 

KAMinus 

.Equ 

245 . 

KARParen 

.Equ 

244. 

KAExp 

.Equ 

243 . 

KAComma 

.Equ 

242. ; Comma within function 


Logical 

operators 

KALess i han 

.Equ 

241 . 

KAGtrThan 

. Equ. 

240 . 

KAEqua ! s 

.Equ 

239 . 

RALessEqua 1 

.Equ 

238. 

KAGtrEqua I 

. Equ 

237 a 

KANot Equal 

.Equ 

236 . 

— continued next page 
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— continued previous page — 


n 

This i 

S JU.5t US 

ed by rep] icate 

KAbsCoor 

rEOU 


210 . 

3 

Now start the functions 

KFRound 

,Equ 


217b 

KFOr 

.Equ 


218. 

KFAnd 

• Equ. 


219. 

KFSum 

.Equ 


220. 1 ; First because most common 

KFAvg 

.Equ 


22 1 s 

KFChoose 

.Equ 



KFCount 

.Equ 


223 * 

KFError 

.Equ 


224. 

KFIRR 

.Equ 


,cr- 

KFIF 

.Equ 


226 „ 

KFINT 

.Equ 



■ ’Lookup 

.Equ 


228 * 

KFMax 

.Equ 


229 « 

KFM i n 

.Equ 


230 . 

KFNA 

.Equ 


231 , 

KFNPV 

.Equ 


232 . 

K'FSQRT 

.Equ 


•703 

: FAbs 

.Equ 


234 . 

S 

Now some constants 

KHighCol 

.Equ 


127. 

KFirstDLine 

.Equ 


2 


.Equ 


IS. j 18 lines on screen 

(-.Last E* l. i n e 

.Equ 


19. 

LIntNum 

.Equ 


8 3 Length of internal numerics storage 

; Zero page addresses 

for Quick 

Cal c 

CurRow 

.Equ 

ZP+OftB 

3 Current Row (1-999) 

Cur Col 

• Equ. 

ZP+ofiD 

3 Current Col (1-127) 

Work Row 

.Equ 

ZP+OAE 

•3 Used by many routines 

Work Col 

.Equ 

ZF'+OBO 

; Used by many routines 

5 Provided by 

GetSpecs 



CCWidth 

.Equ 

. . )B 1 

3 Width of current column 

HOnScreen 

.Equ 

ZP+0B2 

3 Os no Is partial, 2s fully 

VOn Screen 

• Equ 

ZP+0B3 

3 Os no, Is Yes 

MaxLength 

• Equ 

ZP+0B4 


; Provided by 

Ac <_ urn Type 


IsParen 

.Equ 

ZP+0B5 


IsOpr 

.Equ 

ZP+0B6 


Isfil pha 

.Equ 

ZP+0B7 


I sNum 

.Equ 

ZP+0B8 


I sBu i 1 tin 

.Equ 

ZP+0B9 


SwD i spBox 

.Equ 

ZP+OBA 

3 Redisplay the entire sage, including Mak 

SwD i sp i 2 

.Equ 

ZP+OBB 

3 Redisplay all rows within box 

SwDispPl 

.Equ 

ZP+oBC 

; Redisplay line 23 

SwDispCur 

.Equ 

ZP+OBB 

s Inverse the cursor 


continued nexl 


.page 40 


page 


— continued 

previous 

page 



Val idMoves 

• Equ 

ZP+OBE 

1 Va 

id I:..-; 'sqr m x as ■ s : : » nex t two ; in 

Val id Rows 

.Equ 

80 



Va i i d C o 1 s 

a b. Cj l£ 

40 



Val id Any 

• Equ 

BV+4U 



DispFRows 

.Equ 

20 

; Tell 

expand cursor to display full rows 

BispFCol s 

.Equ 

10 

?; 1 el 1 

expand cursor to display -full cols 

Val id! Dim 

. gqu 

08 

5 On 1 y 

allow expand in one direction 

Is Arrow 

.Equ 

ZP+OBF 



SwRecal c 

.Equ 

ZP+OCO 



; zero page 

1 ocat ions 

■for c onver 

■■t to internal 

. ■ a . 

.Equ 


ZP+0C1 


CX2IVal 2 

.Equ 


ZP+0C2 


; Bits tor the above 

two bytes, 

indicat 

ing what's valid right now 

OKUnPM 

.Equ 


80 

; Unury plus or minus 

QKQpr 

.Equ 


4- (,) 

; * + - / or 

OKDots 

.Equ 


20 

s . . . (between operators 

OKRParert 

.Equ 


10 

i Right paren 

OKAt 

.Equ 


08 

; § sign 

QKDecPt 

.Equ 


04 

l Begins a number 

OKLParen 

. Equ 


02 

; Left paren 

QKA1 pha 

.Equ 


01 

. ; A to Z , start ng coordinates 

OKNum 

.Equ 


80 

; Start CX2IVal2, numeric 

OKArrow 

.Equ 


40 

; Can use arrows to find cell 

OKComma 

.Equ 


20 

p Comma is OK 

OKEnd 

.Equ 


10 

: Ok to end now, by CR or arrow. 


>? 

Zero page as 

signment i 


5 

OAB -- 0C8 

Used throughout , 

defined hers 


0C9 - ODB 

Defined and used 

a n Ha i n on 1 y 


0D9 — 0E4 

Defined and used 

by EditH 


0E4 - OEF 

Defined and used 

by uditE, Edit.-, etc 


e ' il ow , is the laya of ■ ie j i fa : •> x-"--; v xx ; ■ s : a;;?:; \ . 

; address is somewhat variable until this settles down . 


; Information 

the file that must be kept while 

th 

e file is in memory , but 

\ c 1 osed * 





Col Widths 

.Equ 

SSWA+3 

5 

128 bytes 

s 

5 

81 obal 

var i ab 1 es 



Q1 oQrder 

• Equ. 

Col Widths+128. 

4 

Initial 2 Appropriate 

81 oReCal c 

.Equ 

8 ! oOrder+ 1 

5 

Initial 2 Automatic 

SvLocn 

.Equ 

81 oReCal c+1 

5 

CurRow ,CurCol 

; Information 

that contr 

■ol s the views 



V I V iews 

.Equ 

SvLocn+3 i Split 

a i 

Slide by side, T(op and bottom 

V I Sync 

.Equ 

VI Views* 1 p Bool aan « 

sync or not if two views 


— continued next page 


Page 


41 


— continued previous page 


3 Information 

for the 

current view, 

vCBl ock 

.Equ 

VISync +1 

VCLFormat 

.Equ 

VCBl ock 

VCVFormat 

.Equ 

VCLFormat +1 

VCTLVer 

.Equ 

VCvFormat+2 

VC 1 LHor 

.Equ 

VCTLVer+i 

VCTTLRow 

.Equ 

VCTLHor+ 1 

VCTTLCol 

.Equ 

VCTTLRow+2 

Vc i Last Row 

.Equ 

VCTTLCol +1 

V CTLastCo! 

.Equ 

VCTLastRow+2 

VCBTLRow 

.Equ 

VCTLastCol + .1 

VCBTLCol 

.Equ 

VCBTLRow+2 

VCBTLVer 

.Equ 

VCBTLCol +1 

VCETLHor 

.Equ 

VCBTLVer+1 

VCBBRRow 

.Equ 

VCBTLHor+1 

VCBBRCol 

, L u U 

V C B B R R o w + 2 

j 3 3 

.Equ 

VCBBRCol +1 

VCBBRHor 

.Equ 

VCBBRVer+i 

VCBWidth 

.Equ 

VCBBRHor+1 

VCRPartial 

.Equ 

VCBWidth+1 

VCTitl es 

.Equ 

VCRPartial +i 

VCBl ockE 

.Equ 

VCTitl es+1 

3 End of View 

(current 

) parameters 


window 


; Standard for view — Initial : Left 
; Standard ; Initials Appro., 0 length 
; T op left corner, ver on screen 
5 Top left corner , hor on screen 

; Titles, top left row (may be aero) 
i Titles, top left col 


.1 Body , top ! eft row 

i Body . top left col 

3 Body, top left ver (of first row) 

; Body, top left hor (of first col) 

; Body, bottom right row 

3 Body, bottom right col 

3 Ver coord of bottom right corner of b 
3 Hor coord » 

; Actual screen cols needed for 
i displayed data 
; Boolean-right coi is partial 
I TOP i ' 30 ' , 1 eft si de : >■: 1 40 ' 


; Information 

for the secondary view 

( i e 

where the 

■ cursor isn't) . 

VSB1 ock 

.Equ 

VCBl ockE 




VSLFormat 

.Equ 

VSB! ock 

5 

Initial s 

Left 

VSVFormat 

.Equ 

or mat- 


Initial : 

Appro . , 0 1 ength 

VSTLVer 

• Equ 

VSVFormat +2 

j 

Top 1 ef t 

corner, ver on sc 

VSTLHor 

.Equ 

VSTLVer+ 1 




VSTTLRow 

.Equ 

VSTLHor+ 1 




VSTTLCo! 

•Equ 

VST i LRow +2 




VSTLastRow 

.Equ 

VSTTLCo 1 +1 




VSTLastCol 

.Equ 

VSTLastRow+2 




VSB PLRow 

.Equ 

VSTLastCol +1 




VSBTLCol 

.Equ 

VSBTLRow+2 




VSBTLVer 

. b. q u 

VSBTLCol +1 




VSBTLHor 

.Equ 

VSBTLVer+1 




VS'BBRRow 

.Equ 

VSBTLHor+i 




VSBBRCol 

.Equ. 

VSBBRROW + 2 




VSBBRVer 

.Equ 

VSBBRCol +1 




VSBBRHor 

.Equ 

VSBBRVer+ 1 




VSBWidth 

.Equ 

VSBBRHor+1 




VSRF'art ial 

.Equ 

VSBWidth+1 




VSTitl es 

■Equ 

VSRF'art ial +1 




VSB1 ockE 

.Equ. 

VS 1 1 1 ! es + 1 





3 End of View (secondary) parameters 


; Area to save the current window so that exact position can be returned to 


5 during rep! icate and formula expansion, 

Cn. , 


SvVCBl ock 

.Equ 

VSB1 ockE 

SvVCCol 

.Equ 

VCBl ockE-VCBl ock+SvVcBl ock 

SvVCRow 

.Equ, 

SvVcCol +1 


More 

variabl as 

Protection 

.Equ 

SvVCRow+2 ; Boolean, on or off 

CameFrVC 

.Equ 

Protect ion+1 ; Boolean, if values need to be calced 


Pags 


y 

5 

RWidth 
RLMarg 1 n 
RRMarg i n 
RChPerlnch 

RLPaper 
RTMargin 
RBMargin 
RL i nesPerlnch 

RSpac i ng 
RPCC 
RDashes 
RPrTitl e 


loomli its 


ARecords 

BotRtRow 

BotRtCol 

ConvError 

ConvMore 

CREPT 

CXISavsX 

CXISWork 

LJCal No 

LJRowNo 

LJCel 1 ID 

LocFormat 

Work Type 


WorkFPD 
Work Va i 

CX 2 I Result 
CX2lRel at i ve 
PrevDAddr 


B1 AnchCol 
B1 AnchRow 


B1 SoStCol 
BI SaStRow 
B1 SoQppCal 
El SoDppRow 


The following are printer formatting variables. They 
get initialized to zero with a w. file. The print 


rout i 

nes will initialize to rea 

I 

initial values. 

.Equ. 

CameFrVC+ 1 

j 

Of paper inches XX. X 

.Equ 

RWidth+i 


Inches XX.X 

.Equ 

RLMarg in+i 

“ 

Inches XX.X 

.Equ 

RRMargin+1 

j 

NN 

.Equ 

RChPerlnch+l 

y 

Inches XX.X 

.Equ 

R LPaper+1 

1 

Inches XX.X 

.Equ 

RTMargin+1 

t 

y 

Inches XX.X 

.Equ 

RBMarg in+1 



.Equ 

RL i nesPer Inch+1 

5 

char c* D or > , all \ anguages 

, Equ 

RSpac ing+1 


Max 13 control char for pr. 

.Equ 

RPCC+14. 

• 

Boolean print dashes for erop’ 

.Equ 

RDashes+ 1 

5 

Print title block on report 

Keep 

track of zoomed in or not 



.Equ 

RPrTitl e+1 



Work 

area to store record point 

&r 

s. 999 for either machine 

.Equ 

SSWA+300 . 



• Equ 

ARecords+MaxGCRows+MaxQCRows+C 

.Equ 

BotRtRow+2 



.Equ 

BotRtCol +1 



.Equ 

ConvError+1 



.Equ 

ConvMore+2 



. Equ 

CRSPT+256 . 



.Equ 

CXISaveX+i 



.Equ. 

CXISWork +128 . 



.Equ 

LJCol No+3 . 



.Equ 

LJRowNo+4 



.Equ 

LJCel 1 10+6 



.Equ 

LocFormat+i 

y 

two bytes. Values and 



y 

propd labels use 1, reg 



3 

labels use 1 

.Equ 

WorkType+2 


Va ! Lies on 1 y 

.Equ. 

Work FF'D+8 

y 

Values and non-prop labels 

.Equ. 

WorkVal +123 . 



. Equ 

CX2IResul t+i 



.Equ 

CX2IRel ative+1 




Stuff for highlighted box 

.Ecu PrevDAddr+2 ; Cursor posn at entry 

•Equ Bl AnchCol +1 


SetCorners 

places the top left, 

and bottom right vvalues 

.Equ 

Bl AnchRow+2 

; Top left corner 

.Equ 

BlSoStCol+1 


.Equ 

Bl Sob‘tRow+2 

; Bot right corner 

.Equ 

Bl BoOppCol +1 
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B1 BsStCol 
B1 BsStRow 
B1 DsOppCol 
B'i BsOppRow 


Rep ! Work 
FFData 
FFType 
FFCoor 
SSCal I er 


CXIPType 

; This next 
^ size is 1 
B'l dReeWA 


Destination row and column 
,Equ B1 SoQppRow+2 

.Equ B1 BsStCol +1 

.Equ B1 DsStRow+2 ; Bat right corner 

.Equ B1 DsOppCol +i 


Note that source and destination are switched during 


parts of 

Rep 1 icate. 

.Equ 

81 DsOppRow+2 

.Equ 

’ Rep 1 Work + 128 

. Equ 

FFData+30 . 

.Equ 

FF l ype+ 1 

.Equ 

FFCoor+6 

CXIPType 

is 


; 128. bytes 
jj 3u bytes 


5 Command that called segment 


Os Left paren was not following an @ function 

non zero; is the parameters byte from the tfunctin table 

.Equ SSCaller+1 ; 20. bytes, just for EditM 


work area is for reading and writing whole rows. The 
550 bytes on 128K system, 5000 bytes on Slinky systems. 
.Equ CXiPType+24. 


- FILE. 40 


op r & adsh ee t tia in omen t En t r >- Fo i n t s 


hccluti i ype 

,Equ 

Bl dCel 1 ID 

.Equ 

Cel I FrES 

.Equ 

Cel 1 FrWA 

.Equ 

Cel 1 ToBS 

.Equ 

Cel 1 2WA 

CT .~i i : 
<CL{ u; 

Cl earCRSPT 

.Equ 

Cl earFi 1 eHeader 

.Equ 

C 1 aarL2L 

.Equ 

ConvertCol No 

.Equ 

ConvertRowNo 

.Equ 

DoMWSubr 

.Equ 

DumpCRSPT 

■ Equ 

DumpFerShur 

.Equ 

HSCel 1 FrBS 

.Equ 

LoadCRSPT 

a C.Cjl.1 

PointAtRow 

• Equ 

Sane2Args 

.Equ 

SetBotRt 

.Equ. 

Swap Views 

.Equ 


A01 dStr 

.Equ 

LFormTabl s 

.Equ 

VFormTabl e 

.Equ 

PostFCF 

.Equ 

FuncNames 

.Equ 


LSSMa x n+2+3 

AccumType+3 

Bl dCel 1 ID+3 

Cel I FrBS+3 

Cel 1 FrWA+3 

Cel I ToBS+3 ; 

Cel 1 2WA+3 

Cl earCRSPT+3 

Cl ear Fi } eReader +3 

Cl earL22+3 

ConvertCol No+3 

C a n v s r t R o w N o + 3 

DoMWSubr+3 ; 

DumpCRSFT+3 

BunipFerShur+3 

HSCel 1 FrBS+3 

LoadCRSPT+3 

PointAtRow+3 

Sane2Args+3 

SetBotRt+3 


s w a p vie w s + 3 
A01 dStr+2 
LFormTabl e+5 
VFormTabl e+7 
F'ostF CF+3 


Need to 


Need to 


load VC file. 


1 oad VC file 


— end of file. 40 
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FILE, 3? 


Spreadsheet Main Overlay tntr 

y F'o i n t s 

f Book of refer 

■ences to Main 

portion of Cal cu 

AnchorBox 

„Equ 

LSSSegs+2+3 

Cal cBHor 

.Equ 

Anchor Box +3 

Cal cBVer 

.Equ 

Cal cBHor+3 

CenterCurRow 

.Equ 

Cal cBVer+3 

CExt2Int 

,Equ 

Cent erCurRow+- 

CInt2Ext 

.Equ 

CExt2Int+3 

Cl ear-Row 

• Equ 

CInt2Ext+3 

ConvFFD2S 

.Equ 

Cl esrRow+3 

DispAl 1 

.Equ 

Lon vF PB2S+3 

DispCur 

.Equ 

DispAl ; 43 

DispPrev 

• Equ 

DispCur +3 

BispRow 

.Equ 

DispF'rev+3 

DidWinScr 

.Equ 

D i spRow+3 

BoSvSt 

.Equ 

DidWinScr+3 

BoRetn2St 

.Equ 

uoSvSt+3 

DOSync 

.Equ. 

DoRetn2St+3 

Draw I Box 

.Equ 

DoSync+3 

D1 Entry 

.Equ 

Draw I Box +3 

ExpandCursor 

.Equ 

D1 Entry +3 

F 1 Entry 

.Equ 

ExgandCursor-L 

GetSpecs 

.Equ 

Fi Entry- +3 

MCur2Work 

.Equ 

SetSpecs+3 

flCCBBRC 

.Equ 

MCur2Work +3 

MCCBTLC 

.Equ. 

MCCBBRC+3 

MCCBTLR 

.Equ 

MCCBTLC+3 

MCCBBRR 

.Equ 

MCCBTLR+3 

MovaCursor 

, Equ 

MCCBBRR+3 

SetCorners 

.Equ 

MoveCursor+3 

Lind i spCur 

• Equ 

Set Corner s+3 

ScrlnvStatus 

.Equ 

UndisoCur+S 


ul a tor Edit 


\ displays on 


end of File .39 


screen 


a -h e 4 o 



FILE. 10 


word Processor Lemmon Work Area 


Common routines for Word Processor assembly 


=1 Equates 

for Quick Wr 

iter 



irs' Dl ine 


.Equ 




IntReturn 


.Equ 


ODO 

5 Internal rep of 

MamSegNo 


■ Ecu. 


16. 

^ Main is seg . i.6» 

i ask 


.Equ 


"W" 

j ie. , Quick File 



.If 


0psys=2 


V i 5 i b 1 ecR 


.Equ 

.Endc 


7F 

; End of ] ine in . 

; Zero page add 

resses 

for Quick 

Writer 


CurSvSw 


.Equ 

ZP+0A8 

? 

Bool ean . cursor has 

LastVer 


■ Equ 

Z P+uAA 

3 

!_ast screen ' ine a vs. 




? 

text . Usual ; y 21 , 

; The next 

two 

indicat 

e what sc 

reen j ines an 

e to be displayed by i 

DispFrom 


.Equ 

ZP+OAB 

£ 


D i sp T o 


a i— Q U 

ZF'+OAC 



DispOver 


.Equ 

Z P+0 AD 

5 

Boo 1 ean . Must d i sp 1 1 





»• 

i 

data , whatever it wa 

DispLn22 


.Equ 

ZP+OAE 

H 

Boo f ean 

DispLn23 


.Equ 

iP+UAF 



; The next 
CurAdDSP 

are 

pointer 

.Equ 

s within 
ZP+OBO 

the data strui 

? 

ctures 

Address of DSP corre; 





J 

current cursor 1 ocat 





5 

a 1 ways current 

PrevAdDSP 


• Equ 

ZP+0B2 




Return , 


3om in 


i be found, 
able for 


over pre\ 


Not 


Zero page information about 
First for text I ines 


■■ent data I ine 


DLSt ick ies 

.Equ 

ZP+0B4 


BLLength 

.Equ 

ZP+0B5 

; 01-50 is text 

DLCRBit 

.Equ 

ZP+OB6 



In case 

data I 

ine is command or carriage 

DLCount 

.Equ 

ZP+OB4 


DLCommand 

.Equ 

ZP+0B5 

! D0+ is command 


.If 


Language=' ! A" 

ComBo 1 d 

.Equ 


2 5 Control 

ComCopy 

.Equ 


"C'+OAKey 

ComBel ete 

.Equ 


" D " +0AKey 

ComFind 

• .Equ 


"F" +0AKey 

ComCa 1 c 

.Equ 


"K"+QAKev 

ComMove 

.Equ 


"M"+QAKey 

ComChName 

.Equ 


"W'+OAKey 

ComFrOptions 

.Equ 


"G"+QAKev 

ComPrint 

.Equ 


11 P " +0AKey 

ComRepl ace 

.Equ 


"K"+0AKev 

ComSt icky 

.Equ 


“ "+0Akey 

Com Tabs 

.Equ 


"T*'+0AKey 

CoffiUnderLine 

.Equ 


12. ; Control 

Com Zoom 

a EG LA 


" Z " +0AKey 

ComPageBack 

.Equ 


1 1 . +0Akey 

ComPageForw 



1 0 . +0Akey 


return 1 ine 


Page 47 


• i ous 



.If 

Language=‘f- 


ComBol d 

.Equ 

“7 

; 

? Control 

LomCopy 

.Equ 

"C " +OAKey 


comDe ! ete 

.Equ 

”£ B +0AKev 


ComF ind 

.Equ 

"L"+OAKey 


LamCa i c 

.Equ 

"K“+OAKev 


ComMove 

.Equ 

,! D"+0AKey 


ComChName 

.Equ 

,, N"+QAKey 


comPr Opt ions 

• Equ 

"Cr'+OAKev 


ComPrint 

.Equ 

“P"+OAKey 


L-DlTl.Rep 1 B.CB 

.Equ. 

!l R"+OAKey 


comSt i c k y 

.Equ 

i! " -f-OAKey 


ComTabs 

.Equ 

"M"+0AKey 


ComUnderLine 

.Equ 

19. 

; Control 

ComZoom 

.Equ 

"Z"+uARev 


ComPageBack 

• Equ 

1 1 . +0AKey 


ComPageForw 

.Equ 

.Endc 

.If 

i 0 . +DAKey 

Language=“G" 


ComBol d 

.Equ 

Cj 


LomLopy 

.Equ. 

"K"+0AKey 


ComDel ete 

.Equ 

"L"+0Ak.ev 


ComF i nd 

.Equ 

"F !, +CAK:ey 


ComCal c 

.Equ 

" U " +OAKev 


ComMove 

.Equ 

"B"+OAKey 


ComChName 

.Equ 

"N"+OAKey 


ComPrQptions 

. Equ 

"pH+OAKey 


Comprint 

.Equ 



ComRep 1 ace 

.Equ 

“ E " +QAKev 


LomT abs 

.Equ 

’T'+OAKey 


ComZoom 

.Equ 

"A"+OAKey 


ComPageBack 

.Equ 

3. 1 . +0AKey 


ComPageForw 

.tqu 

lO.+OAKey 


ComSticky 

.Equ 

"+0AKey 


ine 

.Equ 

.Endc 

.If 

if 

Language 12 " I “ 


ComBo 1 d 

.Equ 

14 . 

: Control 

ComCap y 

.Equ 

“D"+OAKey 


ComDel ete 

.Equ 

"E"+OAKey 


ComF ind 

.Equ 

"C+OAKey 


CamCa] c 

.Equ 

" K " +OAKey 


ComMove 

. Equ 

“M ,, +0AKey 


ComChName 

.Equ 

"N"+0AKev 


ComPrOptions 

.Equ 

“P"+OAKey 


ComPrint 

. Equ 

" S " +OAKey 


ComRep 1 ace 

.Equ 

"R"+GAKey 


ComTabs 

.Equ. 

"T"+0AKey 


com Zoom 

.Equ 

"Z ,, +0AKey 


ComPageBack 

.Equ 

1 1 . +OAkey 


ComPageForw 

.Equ 

1 o . +OAKey 


ComSticky 

.Equ 

" "+0AKey 


ComUnderl ine 

.Equ 

.Endc 

19. 

; Control 


s Equates 

that define 

the printer options. Makes them easier to change. 

PQPW 

.Equ 

0D8 

POLM 

.Equ. 

0D9 

, 

r* ‘ . 
u £ G L ; . 

OBA 

F'QCI 

.Equ 

ODB 

POP .1 

C -nt » 

S W 1— t 

ODC 

POP2 

.Equ 

ODU 

POIN 

.Equ 

ODE 

POJU 

.Equ 

ODF 

... . 

.Equ 

0E0 

POOR 

.Equ 

OEi 

POF'L 

.Equ 

0E2 

POTM 

• Equ. 

0E3 

POBM 

.Equ 

OE4 

POL I 

.Equ 

0E5 

POSS 

.Equ 

0t6 i Single spacing 

PODS 

.Equ 


POTS 

.Equ 

OES 

POMP 

.Equ 

0E9 

P06B 

.Equ 

OEA 

POOL 

.Ecu 

OEB 5 Group 

POKE 

.Equ 

OEC 

F'OFO 

.Equ 

OED ; Footer 

PQSK 

.Equ 

OEE 

F'OPN 

.Equ 

OFF 

POPE 

.Equ 

0F0 

POPH 

.Equ 

OF 1 

POSH 

.Equ 

0F2 

• 

These 

are not available on options menu. They are inserted 

1 

when | 

irint ir.g . 

r OPfir 1 US 

.Equ 

0F3 

POPCi 

.Equ 

0F4 j Page break, count is page number 

POF'CiPl us 

.Equ 

0F5 ; Page break , count +256 is page number 

POPC'2 

.Equ 

0F6 ; Page break, split a paragraph 

P0PC2P1 us 

.Equ 

OF? | Page break , split a paragraph 


Imbedded commands 

POBB 

.Equ 

001 

POBE 

.Equ 

002 

POP 1 usE 

• Equ. 

003 

3P1 1 sE 

.Equ 

004 

POL i nusB 

.Equ 

005 

POMinusE 

.Equ 

006 

F'OUB 

.Equ 

007 

POUE 

.Equ 

008 

POPP 

= EQU 

009 

POEK 

.Equ 

GQA 

POSt i ck 

.Equ 

00B 

POMM 

.Equ 

00C ; Out of order 

; The foil 

owing is th< 

e layout of the Quick Writer work area. The beginning 

; address 

i s somewhat 
.List 

variable until this settles down. 

; Information that is 
; to save when closed 

built while a file is open, and not important 

H ^ 

Leave 

a two byte buffer for mistakes 

B ! dRecWP 

• Equ 

WPWA 

B! dRec Text 

.Equ 

B1 dRecWA+1 5 Text portion 


; One switch -for each of -first 22 lines an screen 0. .21 . The value is the 
\ number of characters displayed the last time the line was done. Values are 

from 1 to cecimai 30. $Hex BO is a special case of a carriage return display. 

PrevD i sp . Equ B! dRec WA+ i 00 . 

; A pointer- to the DBF in DSPTab for each line on the screen. Zeroes are valid. 

} and indicate bevond the end of the document. 

ScrAdDSP .Equ PrevDisp+24 . 


4? 



Information about previous line. Only used occasionally, 
First for text 1 me- 


sngth fcL 


PLStick iss 

u c.£j Li 

ScrAdDSP+46 . 

PLLengtn 

. tqu 

PLStick ies+i 

:rb i t 

.Equ 

PLLength+l 

PLRecWA 

.Equ 

PLCRBit+i 


in csss 

data line is command or 

PLCount 

.Equ 

r L O t 1 u, k 1 be tq 

PLCommand 

.Equ 

PLCount + i 

; How to fi 

nd the cursor 

1 if its place is marked 

; byte of s. 

certain LtsP . 


CurSvDSP 

.Equ 

PLRecWA+St' . 


ytes past the fir 


Curbvuount 

OurSvLM 

on 1 y 

CurSvPE 

CurSvAtLM 

CurSvVsr 


.tqu 

.Equ 

.Equ 

.Equ 

.Equ 


; Request being made of segment 
Cal 1 erComm .Equ 


CurSvDSP+2 

CurSvCount+3 

CurSvLM + l 
CurSvPE + i 
CurSvAtLM+1 

. Like SComPrint 
CurSv Ver+ 1 


many o 


o b ,'tes bytes to skip past 


In case forget 


:omm 1 ins 


Byts 


oast last valid char 


: Tell PutCurData to bitch about lost text. Dorr 
PCS itch .Equ CallerComm+1 


Boolean, was on LM at time 
Ver when key was pressed 


in Copy, 


; Beginning of the word processor master record. 
wPHeader .Equ PCBitch+i 

MSNextDSP .Equ WPHeader 

, IWFillerl .Equ ; ADOLF a when 

TabStLen .Equ IWFillerl+2 

TabStops .Equ TabStLen+1 j is no-stop 

ZoomlnSw .Equ TabStops+80. 


! 


it op 


; These parameters are used to return to the same screen contents whenever 
: this file is selected from among those on the desktop. Although saved on 
■ disk, they are re-initial iced when a file is read from disk. 


ResumefiSF 
i WLast V e r 
IWLastHor 


v'al idF'agin 
MinLM 
MM In Doc 


.Equ 

.Equ 

.Equ 


.oomlnSw+l 
ResumeDSP 
i WLast Ver+ 1 


Now some miscellaneous stuff 
. Eq u I WLast Hor+ 1 

.Equ val idPagin+1 

.Equ MinLM+i 


op i me of screen 


; Boolean, pagination is OK 
; Min Left. Mar whole doc. 

; Boolean, mail merge in file 


Work area to store record pointers. Values higher than 0000 are command; 
Variable number of records, depending on whether Slinky here or not. 
First text line is right at ARecords. 


ARecords 


■ tqu 


WPHeader+300 , 


FILE, a? 


word i-T-ocessor Main Segment Entry Joints 

Cl earF i 1 eHeader .Equ LWPMain+2+3 


CurVsEnd 

*Equ 

CurVsLast 

.Equ 

CurVsNext 

.Equ 

MsgMaxLines 

.Ecu 

NoMMBMsg 

.Equ 

PointAtOptions 

.Equ 

F'utCurData 

.Equ 

Pel An 82 

.Equ 

Set CurDat a 

.Equ 

TextLost 

.Equ 

VerBotLine 

.Equ 

PCF'ointers 

.Equ 

ICF'ointers 

.Equ 


C : aarFil aHeader+3 

C-urVsEnd+3 

CurVsLast +3 

CurVsNext+3 

MsgMaxLines+3 

NoMMDMsg+3 

Po i nt At Op t i ons+3 

Put CurDat a+3 

Pel AnS2+3 

Set CurDat a+3 

TextLost+3 

VerBotLine+3 

PC P* Q i rj f Q p -tt 4* V i A a 


■ — end of file. 37 
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Part I of File formats for AppleWorks ana /// E-2 Pieces 


“his document describes the file formats for AppleWorks and /// E-2 Pieces as 
of i i/20/86. This is not confidential information, and mav be copied as 
necessary . 


Definitions 

LSB: The least significant byte of a word. It is also the "left byte." the 

“first byte off the disk," and the "lower address in memory." As you. 
can see, were going to try to explain our buzzwords. 

MSB 2 The most significant byte of a word. Its address will be one higher 
:han the address of the LSB, in memory, and on disk. If the total 
value of a word is less than 256D, this byte will be zero. 

MRL: Data base multiple record layout. 

SRL: Data base single record layout. 

RAC: Review/Add/Change screen 

lWs Shorthand for "one word." You will also see references to bytes, in 

the form "3B," for example. 

1BI : One byte integer. Values from 0 to 255 decimal . A value of decimal 

50 will be stored as 32H. 

1WI: One word integer. Bit 80 of the LSB has a value of 128 decimal. Bit 

80 of the MSB is the sign bit. Bit 01 of the MSB has a value of 256 
decimal . 

Boolean: A single byte that either zero ("false") or has the rightmost bit 
turned on ("true"). If the rightmost bit. is on ("true") there may 
also be other bits on. These additional bits have no meaning. 

String: A 1BI followed by the number of characters shown in the value of the 
1BI . 

F'roOGS: All references to ProDOS apply equally to SOS. 

DB: AppleWorks and/or /// E~Z Pieces Data Base 

SS; AppleWorks and/or /// E-Z Pieces Spreadsheet 

WP: AppleWorks and/or /// E-Z Pieces Word Processor 

AW: AppleWorks and/or /// E-Z Pieces 

Bit 80: All bits are referred to by their hex idee ima! value. 80 is the 
leftmost bit in a byte, 01 is the rightmost. 

"+" All addresses within an area will be relative to the first byte of the 

area. For example, the first byte of the area will be referred to as 

h byte would be "Byte +9." 

Hex /dec: All hexadecimal numbers will be shown with a trailing H as in 1CH. 

Decimal numbers mav sometimes be shown with a trailing D. Numbers 
without a D or an H are decimal . 


V A Q 0 


D i sk D I pact or y I n f or-m-a 1 1 on 


You may wish to refer to Apple's SOS Re-ference Manual , Volume 1, page 100. 


Three tile types are reserved -for AW tiles: 

File type 19H Data Base 

File type 1AH Word Processor- 

File type 1BH Spreadsheet 


The vol ume/subdi rectory auxiliary type word (+1FH) is used by AW to control 
upper/lower case display of file names. Bit 80 of the LSB refers to the fir 
character of the file name, bit 02 of the MSB refers to the 15th character, 
so on * 


Aw performs the following steps when it saves one of its files to disk: 


1. Zero all 16 bits of the auxiliary type word. 

2. Examine the file name for lower case letters. If one is found, change 
to "1" the corresponding bit in auxiliary type word and change the 
letter to upper case. 

3. Examine the file name for spaces . If a space is found, change to " Jr 
the corresponding bit auxiliary type word, and change the ’space to a 
period . 


When files are read from 
from the directory "file 
be 1 ower case, and which 

If you use the auxiliary 
d isp 1 ay the file names , 


disk, the file name and auxiliary type information 
entry” are used to determine which characters should 
periods should be displayed as spaces. 

type bytes for a different purpose, AW will still 
but it is likely that the wrong letters will be lower 


i/i st; 


Data Bas e F ■ I e s 


Data Base tiles start with a variable length header, followed by 600 bytes far 
each report format (if any), the "standard values" record , and then variable 
length information for, each "record," 


Header Record 

The header contains category names, record selection rules, counts, screen 
positioning information and all other information that is not specific to one 
record , 

+000 - +001 1WI that is the number of bytes in the remainder_of the 
header record . Use this count for your next ProOOS read 
from the disk, 

+002 -- +029 Ignore these bytes, 

+030 Cursor direction when Return is pressed in SRL. 1H; Order 

in which you defined categories, or 2 Hs Left to right, top 
to bottom, 

+031 What direction should the cursor go when you press Return 

in the URL? D)own or Riight, 

+032 - +033 Ignore these bytes. 

+034 Style of display that Review/Add/Change was using when the 

file was saved ; R : SRL . / : MRL , 

+035 1BI Number of categories per record . Values from 01H to 

1EH 

+036 - +037 1WI Number of records in file. 

+038 1B1. number of reports in this fils, maximum of 8. 

+039 - +041 Ignore these bytes. 

+042 - +071 1BI for each of up to 30 columns, showing the number of 
spaces used for this column on the MRL. Be sure that you 
understand that categories may have categories on the' MRL, 
the defined category that appears in each position. Byte' 
+078 is the leftmost column of the MRL, and has a value 
from 01H to 1EH that defines which of the category names 
appears in this position. These numbers change as a result 
of changing the layout of the MRL. 

+108 - +113 Ignore six bytes. 

+114 - +143 1BI For up to 30 categories on the SRL, the horizontal 

screen position. These are changed as a result of changing 
the layout of the SRL, AW makes sure that these entries, 
and the vertical screen positions, are kept in order from 
left to right within tap to bottom. 


+ 144 

~ +1 49 

Ignore these six bytes. 



+ 150 

- +179 

1BI For up to 30 categories 
screen position. 

on the SRL, the v 

ertical 

+ 1 80 

- +185 

Ignore six bytes. 



+186 

- +215 

1BI For up to 30 categories 
category names appears in th 
result of changing the SRL, 
category names listed below. 

on the SRL, which 
i s Dos i t i on , l hese 
This number refers 

of the 
change 
to the 

+216 

- +221 

Ignore six bytes. 




continued next page 


Kagt; +4 


*222 1BI Number of categories on MRL. Will be 1 ess than , or 

equal to the number o-f categories in the tile. SRL displays all 
categories, so there is no equivalent number tor SRL. 

1-223 - +224 1WI For first line at RAC selection rules. Zero means no 
selection rules, any other value refers to the category name that is 
tested. MSB will always be zero. 

■+225 -- +226 1WI Category name for second line of RAC selection rules. 
Zero means that there is only one line. 

+227 - +22S 1WI . Category name for third line of RAC selection rules. 
Zero means that there is no third line. 


+229 - +230 1WI. For first line of RAC rules, which of the tests is to 
be applied, i means "equals," 2 means "greater than" and so on, 

+231 - +232 Test for second line of rules, if any. 

+233 - +234 Test for third line, if any, 

+235 - +236 iWI Continuation code for first lines 1: And, 2s Or, 3: 
Through . 

+237 - +238 IWI Continuation code for second line. 

+239 - +240 1WI Continuation code for third line. Not possible, so 

always zero. 

+241 - +272 String, max length 30 bytes. Comparison information for 
first line RAC selection rules, 

+273 -- +304 Comparison for 2nd line. 

+305 - +336 Comparison for 3rd line, 

+337 - +356 Ignore these six bytes, 

+357 - +378 Name of the first category. A string, maximum length 20 
bytes. If the file has only one category, the header record will end here, 

+379 - +400 Name of the second category, if any. This area will not 
be on the header record if there is only one category. 

+401..., Additional 22 byte entries for all remaining categories. 

The size of the header record depends on the number of categories. Space 
is not maintained past, the last category. 


hags 



iC -M Lti 


Report Records 

sport Records follow the header record. One of the header record categories 
ells you how many report records to expect . The number will foe from 0 to 8= 
ach report record is 600 bytes, and contains: 

+000 +019 String (max 19) Report name 


+020 - +052 


Column width ( 1 B I ) for up to 33 columns a tables style 
report format. Byte +020 is for the leftmost column on a 
tables style report . There can foe up to 30 categories from 
the file, plus 3 more calculated columns. 


For labels style report formats, the value is a 1BI that 
has the horizontal position of this category, relative to 
the left margin . 


+053 — +0$5 Skid 3 bytes * 


+056 - +088 For tables style: Number of spaces to be printed at the 
right of justified columns. 

For labels style: Vertical position on the report for each 
of up to 30 categories. 1BI A value of i means that 
category is on first line of labels style report . 

+089 - +09 i Skip 3 bytes. 

+092 - +124 For up to 33 columns of tables style; Values from 1 to 30B 

refer to which category name appears in this column on the 
report . Values of BOH, 81H and S2H are the three 
calculated categories, from left to right. 

For labels styles Same as tables style, minus the 
cal cul ated categories . 

+125 - +12? Skip these three columns 

+128 - +160 For up to 33 columns of tables style: 99H means no foot 
totals, 0 thru 4 means the number of decimal places for a 
foot total . 


For labels style: For up to 30 categories on report, 
boolean whether or not category names are to be printed. 

+161 - +163 Skip these three bytes. 

+164 - +196 For up to 33 columns of tables style: 99H means left 

justified, OH through 4H means right justified with 0 to 4 
dec i ms 1 p } aces . 

For up to 30 categories of labels style: Boolean whether 
or not to float (0A-j) this category up against the 
category to its left. 

+ 197 -- +199 Skip three bytes. 

+200 1BI . Number of categories on report . Includes calculated 

categories * i*f an y * 

+201 Tables style. If there is at least one calculated 

category, this is a IB I containing values from 1H to 33B: 
which column of the report . 

Labels style: 1BI . Values from 3H to 21D. Position of 
line on the screen that says "Each record will print nn 
lines." 


4 * 


Tables styles Same as +201, but for the second calculated 
category, if any. 

Label s sty i e ; Unused . 

— continued next page — 



+ 203 1 

category, if any, 


Label s styl e : Unused 


+ c U 4" ] ab i sty s e on ! y 
stating which of the category nami 
GOD . 

+205 _ Platen width valui 
value of 8,0 inches entered by the user win show as SOD or 50H. 



4'"n 1 

but 

for the 

third 

cal cul 

ated 

d 

T .f 

there 

i5 

a group 1 

:otal c 

d! uron , 

a IB I 

i 5 

Ltswu as a 

basis , 

Val ues 

from ' 

ID to 

in 

IOths 

of 

an inch. 

For e: 

x amp 1 e 

q -cA 


+L06 

+207 

+208 

+ 20 ? 

+210 

+211 

2 

+213 

+214 

+215 


Left margin value. All inches values are in lOths, 

R i ght marg i n va 1 u.s . 

Characters per inch , 1BI . 

Paper length value. iOths of an inch, 
i op marg i n va 1 u.s , 

Bottom margin value. 

Lines per inch. 6H or 8H. 1B1 . 

Not relevant. Probably always a. "C" . 

Type of report format. H: tables style, V? labels style. 

Spacing: S< ingle, double, or T triple. Expect these three 
letters, even in European versions. 

+216 Print report header. Boolean. 

+2J.7 Tables style: If user has specified group totals, Boolean; 

just print the group totals. 

+218 Labels styles Boolean, omit line when all entries on line 

are blank. 

+219 Labels style; Boolean, keep number of lines the Same 

within each record. 

+220 - +301 SO byte string. Title line, if any. 

+302 - +323 Tables style, 20 byte string. Name of first calculated 

category, if any. 

+324 - +355 Tables style. 30 byte string. Calculation rules for first 
calculated category, if any. 

+356 - +409 Tables style. Name and rules for second calculated 
category , if any. 

+410 - +463 Tables style. Name and rules for third calculated 
category , if any. 

+464 - +477 If user has specified "Send special codes to printer," this 
is a 13 byte string containing those codes, 

+478 Boolean: Print a dash when an entry is blank. 

+479 - +592 Record selection rules. Exact same format as described in 
the header record , 

+593 +599 Unused 


Page 


+599 Unused 


Data Records 


Data records follow the report records, (he -first data record contains the 
standard values. Each following data record corresponds to one data base 
"record . " 


These records contain all of the categories within one stream of data. The 
category entries are in the same order that the category names appear in the 
header record , 

Bytes +0 and +1 are a Word that contains a. count of the number of" bytes in the 
remainder of the record . 

Byte +2 of each record will always be a control byte. Other control bytes 
within each record define the contents of the record . Control bytes may be; 

01-7FH This is a count of the number of fallowing bytes that are 
the contents of a category , 

81-9EH This (minus 80) is a count _of the number of categories to 
be skipped. For example, B2H means skip two categories. 

FFH This indicates the end of the record , 

The information in individual categories may have some special coding so that 
date and time entries can be arranged (sorted) . 


Date entries 
+000 

+001 - 002 
-WJU3 


will have the following format; 

C0H (192D), Identifies a date entry. 

Ascii year code, like 84, 

Ascii month code. A means January , L means December. 


+004 - +005 Ascii day of the month. 


Time entries wii 
+000 
+001 


+002 - +003 
This is the end 


1 have the following formats 

D4H (212D) . Identifies a time entry. 

Ascii hour code. A means 00 (the hour after 
means 23, the hour before midnight. 

Ascii minute code. Values from 00 to 59, 

of the data base file formats. 


midnight) , 


X 



uior d Prcc sssor f i 1 es 


Word Processor tiles 
variable length line 


start with a 300 byte header, 
records, one -for- each line on 


followed by a number of 
the screen 


Header Records 


The header contains the following informations 
+000 - +003 Not used . 

+004 4FH (?9D) 


+U05 — +u84 
+ 085 

+086 ~ +089 
+090 

+091 

+092 

+093 ~ +249 
+250 - +299 


Tab stops. Either = or 1, 

Z op mi switch. Boo 1 ean . 

Four bytes not used . 

Boolean, whether file is currently paginated, ie., whether 
the page break lines are showing. 

Minimum left margin that should be added to the margin that 
is appearing on the screen . This is normally one inch, 
shown in lOths of an inch, 3. 0B or 0AH . 

Boolean, whether file contains any mail -merge commands. 

Not used. More or less reserved for "mail merge" feature. 

h v a i S ab i e . W i Never be uses by App \ eWorks . If you are 
creating AW WP files, you can use this area to keep 
information that is important to your program. 


Line Records 

Line records are of three different types. The first line record after the 300 
byte header corresponds to line 2. the next is line 2 , and so on. The first 
two bytes of each line record contain enough information to establish the type. 

Carriage return line records have a BOH (208B) in byte +001. Byte +000 is a. 

1BI between 00 and ?9D that is the horizontal *eh position tn ; s ;:ar--i 
return . 

Command ! me records are formatting commands that appear on the screen in the 

form Double Space, for example. These can be identified by a value 

greater than D0H (2080) in byte +001. They are; 


Byte 

+001 Command 

Byte +000 

D8H 

Platen width 

lOths of an inch 

D9H 

Left margin 

lOths of an inch 

DAH 

Right margin 

lOths of an inch 

DBH 

Chars per inch 

1BI . 

DCH 

Proport ional -1 

No meaning 

DDH 

Proportional -2 


DEH 

Indent 

1BI characters 

DFH 

Justify 


E0H 

Un justify 


E1H 

Center 


E2.H 

Paper 1 ength 

lOths of an inch 

E3H 

Top margin 

lOths of an inch 

E4H 

Bottom margin 

lOths of an inch 

E5H 

Lines per inch 

1BI . 


Single space 


E7H 

Double space 


E8H 

Triple space 


E9H 

New page 


EAH 

Group begin 


EBM 

Group end 


ECH 

Page header 


EDH 

Page footer 



— continued next page — 


Page 59 


EhH 

Skip lines 

1BI 

count 

EFH 

Page number 

1BI 


F0H 

i~ -z\ LI 3 3 33 C n P 3 9 3 



F1H 

Pause here 



F2H 

Set mar k e r 

1BI 

marker number 

F3H 

Page number 

1BI 

(add 256) 

F4H 

Page break 

181 

page number 

F5H 

Page break 

1BI 

(add 256) 

F6H 

Page break 

1BI 

(break in middl 

paragraph ) 




F7H 

Page break 

1BI 

(add 256, in mi- 

paragraph) 




FFH 

End of file 




Text Records 

Text records are the lines where text has been typed. The -format 
is : 


+000 - +001 Word, Number of bytes following this word. Since 
the maximum is about SOD, byte +001 is always 
zero. Use byte +001 to identify text lines. 

+002 Screen column for the first text character. 

Usually will be zero, but may vary as a result of 
left margin, centering, and indent commands. 

+003 SO bit; If on, there is a carriage return on the 

end of this line. It off, no carriage return. 


Remaining 7 bits: Number of bytes of text 
following this byte. 


+004 - nnn 


Actual text bytes, 
and special codes 
from 01 H to 1FH 
f eatures t 

Code 
01 H 
02H 
OSH 
04H 
OSH 
06H 
07H 
OSH 
. 09H 
0AH 
0BH 
0CH 


Consists of Ascii 
The special codes 
and indicate special 


Meaning 

Begin boldface 
Boldface end 
Superscript begin 
Sup erscr ipt en d 
Subscript begin 
Subscript end 
Under 1 me begin 
Underl ine end 
Print page number 
Enter keyboard 
sticky space 
Mail merge 


c n i a r a c t e r s 
are val ues 
formatting 


This is the end of word processor file format, 
— End of -file, 2 
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FILE. 15 


Part II of File formats for AppleWorks and /// E-Z Pieces 


Sore adsheet File s 


Spreadsheet Mies start with a 300 byte header record that contains basic 
information about the file, including column widths, printer options, window 
definitions, and standard values. 


Header- Record 

The spreadsheet header record contains the following entries 2 

+000 - +003 Skip 4 bytes. 

+004 - +130 1BI containing the column width for each column. 

+13. Order of recalculation. ASCII R or C. 

+132 Frequency of recal cul ation . ASCII A or M. 

+133 - +134 Last row referenced. Word. 

+135 Last column referenced. 1BI . 

+136 Number of windows: ASCII 1: just one window, 5; side by side 

windows, T; top and bottom windows, 

+137 Boolean. If there are two windows, are they synchonized? 

+138 - +161 The next 20 (approx) variables are for the current window. If 
there is only one window, it is the current window. If there 
are two windows, the current window is the window that had the 
cursor in it. 

+138 Window standard format for label cells. 2H; left justified, 

3H: right justified, 4H: centered. 

+139 Window standard format for value cells. 2H; fixed, 3Hs 

dollars, 4H*. commas, 5H: percent , 6H: appropriate 

+140 More of window standard format for value cells. Number of 

decimal places to display. Values from 0 to 7H. 

+141 Top screen line used by this window. This is the line that the 

=====ft=========B==== : appears on. Normally IK unless there are 

top arid bottom windows, 

+142 Leftmost screen column used by this window. This is the column 

that the hundreds digit of the row number appears in. Normally 
OH unless there are side by side windows. 

+143 - +144 Top, or first, row appearing in titles area. This will 
probably be zero if there are no "top" titles. 

+145 Leftmost } or first, column appearing in left side titles area. 

This will probably be zero if there are no left side titles. 

+146 - +147 Last row appearing in top titles area. This will probably be 
zero if there are no top titles, 

+148 Last column appearing in left side titles area. This will 

probably be zero if there are no left side titles, 

+149 - +150 Top, or first, row appearing in the body of the window. The 
body is defined as those rows that are on the screen , but not 
in the titles area. 

— continued next page — 
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+■154 - + 1‘ 


+ 1611 " +1 85 


Leftmost , or first, column appearing in the body at the window. 

The screen line that the too body row goes on. Normally 2H 
unless there are top titles, or top and bottom windows. 

Leftmost screen column used for the leftmost body column. 
Normally 4H unless there are side titles, or side by side 
windows’. 

Bottommost, or last, row appearing in this window. 

Rightmost, or last, column appearing in this window. 

The screen line that the last body row goes on. Normally 13H 
(19D) unless there are top and bottom windows. 

The rightmost screen column used by this window. Normally 4EH 
C7SD) unless there are side by side windows, 

181 . Number of horizontal screen locations used to display the 
body columns. Normally 48H (72D) , because 8 columns of 9 
characters each are the standard display. This is effected by 
side by side windows, side titles, and variable column widths. 

Boolean. Rightmost column is not fully displayed. This can 
only happen when the body portion of the window is narrower 
than the width of a particular column. 

Titles switch for this window. Bit 80: top titles, Bit 40: 
side titles. These bits represent top titles, side titles, 
both, and no titles. 

Window information for the secondary window. This is 
meaningful only if there are two windows. This is the 

jrmation for the window that the cursor is not currently in. 
See the descriptions for the current window (+138 - +161) , 

Not currently used. 

Boolean, cell protection is on or off. 

Not currently used. 

Platen width value, in IOths of an inch. For example, a value 
of 8.0 inches entered by the user will show as SOB or 50H. 

Left margin value. Ai ■ inches values are in IOths. 

R i ght marg i n va 1 ue , 

Characters per inch. 1BI . 

Paper length value. IOths of an inch, 

T op marg i n val ue . 

Bottom margin value. 

Lines per inch. 6H or 8H. 1BI. 

Spacing: Sling's, Bfouble, or TCriple. Expect these three 
letters, even in European versions. 

If user has specified "Send special codes to printer," this is 
a 13 byte string containing those codes. 

Boolean: Print a dash when an entry is blank. 

Print report header. Boolean. 

Boolean, Zoomed in to show formulas. 

Reserved for future use. 

Aval 'able, Wi ! I Never be used by hop : e Works . it you cir-e 
creating AW S3 -files, you can use this area to keep information 
that is important to your program. 
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Row Records 


Row records contain a variable amount of information about each row that is 
non-blank. Each row record contains enough information to completely build 
row of the spreadsheet ; 


+000 - +001 


Number of additional bytes to read 
end of file. 


'•rom disk 


FFFFH means 


+0U2 

+004 


+U03 


Word , 


Row number- 


byte QT 


Beginning of actual information for the row. Th 
each record will always be a control byte. Other cent 
bytes within each record define the contents of the record 
wOntro; bytes may be 2 


01-7FH 

81-FEH 

FFH 


This is a count of the number of following bytes 
that are the contents of a cell entrv. 


This (minus 80) 


a count of the number 


columns to be skipped. For example, 82H means 
sk 1 p two col umns . 

This indicates the end of the row. 


Cel! Entries 


Cell entries contain all the information that 
There are several types ; 


ns 


;sary to build one cell 


are at have a ?a! ue that j :har ’hi* 

that someone typed a constant into the cell, 3.14159, for example. 


means 


-MJOO 


Bit SO is always on. 

Bit 40 on means that if the value is zero, display a blank 
instead of a zero. This is for pre— formatted cells that 
still have no value. 


Bit 20 is S: ways un. 

Bit 10 on means that labels 


:annot be typed into this cel 1 . 


Bit. 08 on means that values cannot be typec 


this cel 1 . 


Bits 04, 02, and 01 specify the formatting for this cell 


Q , 

wJ 

4: 

5 » 
6 ; 


Use spreadsheet standard 
F i i=d 
Do! 1 are 

LuGffkTi-3.3 

Percent 

Appropriate 


+001 


Bit 

SO ; 

al ways 

zero . 

Bit 

40 : 

al ways 

z ero . 

Bit 

20 : 

a j ways 

z ero . 

Bit 

10: 

On indi 

cates that this cell mus 

nex 

t time 

■ this s 

preadsheet is cai clu ated 

the 

ref er 

enced c 

ells are changed. This 1 

f or 

cel 1 5 

that h 

ave a calculated formula 

Bit 

£ 04 y 

02, 01. 

Number of decimal placi 

do i 

7 sre 

commas , 

or percent formats. 


, even 1 + none or 
bit makes sense on 


or + i x ed , 


8 byte Aopl e SANE numerics double format floating point 
number . 


+009 


value formulas are cells that contain information that has to be evaluated. 
Formulas like AA17+©sum (r!9 . . .r21 ) , and ©Error are examples. Specific format 


+000 


+00 i 


+002 — +009 
+0i0 - nnn 


+ 


oU is al ways on , 


Bit 40 on means to not dis 


\J ; c< y 


the 


fill 


originally intended for pre-f ormatted cell 


no val ue . If a val ue 
turn off this bit. 

Bit 20 is always off. 


constants . 

Bit SO: always on, 


! I *„ T.7 0 


this cel 1 


W 9 

3.1 5 
be sure to 


a ' e . . ' e 


Bit 40: On indicates that th 
formula resulted in an @NA. 


Sit 20: On indicate 
formula resulted 


1 ast eva 1 uat i on of this 
s that the last evaluation of this 


Bits 10, 04, 01 


n an ©Error . 

1 same as ya : ut 


instants „ 


8 byte SANE double floating point number that 


the most 


recent eval : 


ion of this cel 1 . 


var i ous 


rontrol bytes that are "token 


f ormul a that was typed in by the user- 


representing the 
They are: 


Byte 

DW~ 

Means 

©Round 

DAH 

©Or 

DBH 

©And 

DCH 

©Sum 

DBH 

©Avg 

DEH 

©Choose 

DFH 

©Count 

E0H 

©Error (followed by 3 bytes 

E1H 

Reserved for future ©IRR 

E2H 

©If 

E3H 

tint 

E4H 

©Look up 

E5H 

©Max 

E6H 

©Min 

E7H 

©NA (followed bv three bytes 

ESH 

©NF‘V 

E9H 

©Sqrt 

EAH 

©Abs 

EBH 

Not currently use 

ECH 

<> (not equal ) 

EBH 

>= (greater than or equal to 

EEH 

<= (less than or equal’ to) 

EFH 

= (equals) 

FoH 

> (greater than) 

F1H 

< (less than) 

F2H 

h (comma) 

F JH 

(exponentiation sign) 

F4H 

) (right parenthesis) 

FhH 

~ (minus) 

F6H 

+ (plus) 

F7H 

/ (divide) 

F8H 

* (multiply) 

F9H 

( (left parenthesis) 

FAH 

- (unary minus. Ex: -A3) 

FBH 

+ (unary plus. Ex: +A3) 

FCH 

. . . (dots) 

prinf 

Next 8 bytes are SANE double 

FEH 

Next 3 bytes are row, column 


of zero) 


Two o-f the codes require special information 
- bytes arc-? a 3Ai\£ numerics package “double" 
A] constants within -formulas are carried in 

Code FEH indicates that the next three bytes 


. Code FDH indicates that the next 
precision floating point number . 
this manner . 

point at a ceil i 


+000 


+001 


+002 - +003 


FEH 

Column reference. Add this IB I to the column number of the 
current cell to get the- column number of the pointed at 
c e . 1 » This val us is sometimes negative , but Add a I wavs 
works 

Row reference. Word. Add this word to the row number of 
the current cel 1 to get the row number- of the pointed at 
cell, ibis value is sometimes negative, but Add always 
works . 


Propagated label cells are labels that place one particular ASCII character in 
each position of a window. Handy for- underlining. 

+000 Bit SO is always sera. 


Bit 40 


i s mean i ng i ess = 


Bit 20 is always on. 

Bit 10 and bit 08 are protection, just like value cells. 

Bits 04. 02, 01 are meaningless. Put a 1 here. 

+001 This is the actual character that is to be put in each 

position in the cell . 


Regular label cells contain alphanumeric information, such as headings, names 
and other descriptive information that is not the basis for calculations. 

+000 Bits SO, 40, 20 are always zero. 

Bits 10 and 08 are same as value cells. 

Bits 04, 02, and 01 determine call formatting; 

01: Use spreadsheet standard formatting 

02; Left justify 

03; Right justify 

04; Center 

+001 - +nnn ASCII characters that actually display. The actual length 
was defined earlier in the word that contained the " actual 
number of bytes to read from disk." 


mi; 


the end of the spreadsheet 


srmat 


This is the end of Appl eWorks file formats. Your comments, 
in writing, would be appreciated . You can write to either; 

Apple Computer, Inc. 

Appl eWorks Product Manager- 
20525 Mari an i Avenue 
Cupertino CA 95014 


— End of file. 15 
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Printer Definitions work Area 


: This becomes segment Seg.PR, It is definitions of printers. All of the 
,* addresses are- relative to zero, so all word addresses will have to be 
j relocated when loaded. 

. Incl ude /p/ial 1 /common 

.Incl ude /p/ial 1 /Macros 


. L i st 

•Proc PRDef s 

.Qrg 0 


; So other segments can get past the environment record on disk 
; with enough bytes to store environment record . 


.Byte 
String 
.B1 ock 
.B1 ock 

.If 

String 
• Endc 


0E0 

07 , " Dr i ve 2 11 


Language="A' ! 
8, ” i 0/01/85“ 


HardPathName 
Mam Path Name 

Remainder of MainPathName 
Var i ous 


.If 

String 

.Endc 


String 

.Endc 

.If 

String 


Languages 


Language=“S" 
8 , " 30 . 09 , 85 :! 


Language="I " 
3 . "30/09/85" 


N o w space f o r 


.Endc 


.B1 ock 

10. 

.Block 

ERELength 

.Block 

ERELength 

.Block 

ERELength 

768 bytes that 

come from 

.Block 

300 

. Incl ude 

/p/ial 1 /s 


Filler 


; Table of number of dots for Apple BMP proportional characters. 
PATWidthS ..Pvt p 07 - +R0 .07 .+80 . 1 O . . 1 4 


If 

L 5.n ’3 Li -9. Q 0 •— J m ’ 1 

Byte 

Byte 

Byte 

07 « +80 , 07 t +80 ? 1 0 . , 

i Li 4 alia +b‘U 1 1 J a 0 07 a 

07. ,0?.. 12., 12. 

07 .+80, 12. ,07. +80, 

Byte 

Byte 

■; ‘7 ^ 7 1 v i 7 

Byte 

1 * 7 17 ’ 1 7 '17 

Byte 

i. Xi it H J. XL o c 0 / . +D 0 i. 0 f si 

Byte 

12. ,12a, 12, ,12, +80 

Byte 

14. ,16. ,15. .14. , 1 5 

Byte 

■f ’■=; ' nQ i '17 17 

1 a , V 7 a a i w* • ^ 14 a Hi 

Byte 

i w a 5 1 C- s is 1 c 1 ; iil a h 1 4 

Byte 

! 1 ' 1 /j, 11 1 ‘o' ‘ 1 7 

1 1 s h i T a , 1 J. a , i a , i. -iL 

Byte 

07. a 12 a ,12. ,10., 12 

Byte 

12a ,08. ,07a ,10. ,08 


.Byte 
• Byte 
. E n u v. 


, u. ji-j . j *2 ; 
, ■!. / 1 , IS. , 1 *J 1 t 


, 10 . 

,12 = 


, J. f p 

,17. 


1 7 

, 12 . 


12. ,12. ,10. ,12. ,10. 

12. ,12. ,10. , 10. ,07 , 


i i. .4- 


,12. ,18 

, 13 . , 00 , 


24-27 
IF 


•?r~ 


34—3 / 
38-3B 
3C-3F 

4u-4 1 


“i !.)-• 

58- 


7Q-7P 


Page 


PATWidths 


PATWidths 


PATWidths 


If 

Language=”F" 



Byte 

07 . +80 1 0 7 , + 8 U , 10 . ,1 . 


,/i j-~ V‘ 

Bvte 

12. ,16. +30, 13. ,07. 


24-27 

Bvte 

07. ,07. ,12. ,12. 


9Q_9D 
a.Q aa : 

Byte 

07 .+80 , 12 . ,07 .+80 , 12. 

5 

2C>2F 

jE' V 1 0 

1 9 1 9 i 9 1 9 

... a -i - S .a — - - " 


30-33 

Byte 

12 , , 12 , 12 - , 12 , 


x)4 , ~w / 

Byte 

12. ,12. ,07. +80 , 07 . +80 


JU-jrj 

Byte 

12 . ,12. ,12, ,12. +80 

.1 

3C-3F 

By t e 

12. ,16. ,15. ,14. ,15. ,15. ,15. ,14. 

* 

40-47 

Byte 

- —• B i; 0 *7 E t 1 imf » 1fU.SL.Tt lj j. vJ -• t 1 / 1 Q X W C ij X 2 E 

? 

4B**4F 

Byte 

13., 16., 15., 12., 14., 15., 16., 17. 

i? 

50-57 

Byte 

11 . ,14. ,11 . ,13. ,10. ,12. ,12. ,17. 

3 

58-5F 

Byte 

0 3 f 1 B * 1 jX .1 J U 1 jL Xt 3 J. .A :: 3 1 'J S 3 1 SL S 


60-67 

Byte 

12 . ,08 . ,07 . ,10 . ,08 .,16. ,12. ,12. 

5 

68 — 6 F 

Byte 

12 . ,12, ,10. ,12. ,10. ,12. .12. .16. 


70-77 

Byte 

1 SL. a ^ lX > 5 I U « 5 1 2 b if A A.. «i q IjC B s, I J a t U0 e 


78— 7F 

Endc 




If 

Language=" 8 " 



Bvte 

07 . +80 , 07 . +80 ,10. ,14. 


2 )■ 

Byte 

1 2 , , 1 6 . +80 , 1 3 , , 0 7 , 


24-27 

Byte 

07. ,07. .12. ,12. 


2S-2B 

Byte 

07 . +8U ,12. , U7 . +80 ,12. 


- F 

Bvte 

1 9 1 v i 9 1 9 

. 

30-33 

Byte 

■j •*“> -i •-*; ' -j -{ 

li. a sf j. 3 4 J. -A. 3 ; j. .il a 


34-37 

Byte 

12. ,12. ,07 . +80 , 07 . +BO 

>i 

38-3B 

By 1 0 

12 . ,12. ,12. ,12. +80 


3C-3F 

Byte 

1 2 . ,16. ,15. ,14 = ,15 = , 1 5 = ,15. ,14 = 


40-47 

Byte 

15., OV . ,13. ,12. ,13. ,1 7. ,16. ,15. 

a 

48-4F 

Byte 

13 . , 16 . , 15 . , 12 . , 14 . . 15 . , 16 . , 17 . 


50-57 

Byte 

11. ,14, ,11 . ,16. ,15. ,15. ,12. ,17. 


5S-5F 

Byte 

07. .12. ,12. .10. .12. .12. .10. .12. 


60-67 

By t e 

12 ,, 08 . , 0 / , , 1 0 . , 08 . ,16. ,12. ,12. 


68 “ 6 F 

Byte 

12, ,12, ,10. ,12, ,10. ,12, ,12, ,16. 


7 O -77 

Byte 

12. ,12. ,10. ,12. ,12. ,12., 14. ,00 . 


78-7F 

i Endc 




If 

Language 3 "I" 



:Byte 

07 . +80 , 0 7 . +80 ,10. , 1 3 . 


20-23 

Byte 

12 , ,16. +80 ,13, , 07 . 

H 


Bvte 

0 ? V. > 0 i R B 1 si n * 1 v 

5 

23- 2B 

Byte 

07. +80, 12. ,07. +80, 12. 

j 

2C-2F 

Bvte 

X A.. s a X A.. k i 1 2. c t, X SZ- u 

e 

30-33 

Byte 

12 . , 12 . 12 . , 12 . 

a 

.1 

34-37 

,Byte 

12, ,12. ,07. +80, 07. +80 


38-3B 

Byte 

12 . ,12. ,12. ,12. +80 

5 

3L'-3F 

.Byte 

i 9 i i, i s 1 n i «=■ 1 i *=; •* ii 

.1. i; I) .x j; 4 .x i; r A t B B X -«.* s E x. ... 3 r, X 'A 8 E X B 

. 

40—47 

Byte 

1 er nO 1 9 i -• •{ 9 i 1 1 L 1 

^ v7 3 ij i w i 4 A Jn. 3 3 i w a 4 2. : a 4 X LJ z q J. a 


48-4F 

.Byte 

19 1 L J : P 19 1 A i sr u 1 

A ■—! t; » X i s; a A v q X .A. c tj X : » A ... b t. A W a a X . e 


50-57 

Byte 

11 . ,14. ,11 . ,13. ,10. ,12. ,12. ,17, 

3 

58-5F 

Byte 

1 9 1 9 1 9 1 A 1 9 1 9 1 A • 9 

A An b 4 A A- a r, i «... .. p A n t x A c v A., a « u. o 11 A - 


i 

Byte 

12 , ,08 , ,07 . ,10. ,08. ,16. ,12. ,12. 

3 

68 - 6 F 

.Byte 

A ~ s X A- c r. A b a X A- c c .x y a >• ij A -A. = si A O a 


70-77 

Byte 

A A. 3 3 X -A. n j X ’■-* a j i A 1 j x A t t) i A a 4 *- O b 4 v a 


~ C3 — . 7pr 

.Endc 





Page 



; Table of number 

; SO means it is 
PCTWidths 


ir Apple Letter Quality proportional char-act? 


punctuation . 


.Byte 

06 . +80 , 1 0 . +80 , 1 0 ,,10. 

.Byte 

10. ,10. +60, 12. ,04= 

.Byte 

10. ,10., 10. .10. 

.Byte 

1 0 . +80 , 1 0 . , 1 0 . +80 , 1 0 . 

.Byte 

10. ,10. ,10. , 10. 

. By t e 

10. ,10. ,10. ,10. 

.Byte 

10. , 10 . , 1 0 . + 80 , 10. +80 

.Byte 

12. ,10. ,12. ,10. +80 

.Byte 

1 0 . , 1 4 « ,14, ,14. ,14, ,12, ,1 1. , ,14. 

.Byte 

1 4 . , US , , 1 0 , ,14, , 1 .c = ,14. ,14. ,i. 4* 




.Byte 

1 

,14 

. ,14. 

4 r-. 
i) X X- a 

, 14 , 

, 14 „ 

^ i4 

.Byte 

14." 

, 14 

. , 1 ^ , 

,10. 

,10. 

,10. 

1 A 

, IQ 

.Byte 

•i i~\ 

,10 

•i r», 

i. B X_ u 

,10. 

^ j. .Cl ti 

,10. 

.08 

.Byte 

12." 

,06 

a , 06 a 

, 12 . 

a 06 . 

5 14 X 

' i •*> 

a i X. 

.Byte 

ii. c 

•1 

>1 ... X I. 

. ,10. 

,10. 

,08. 

1 9 

?i4 C 

li lx 

.Byte 

1 “> 
i. X- a 

,12 

. ,10. 

,10. 

,12. 

, 08 . 

,10 

number of dots 

•for Epson 

FX 

proport i 

on al 

eh a 

f *-ac 


• Byte 
. Byte 
.Byte 
.Byte 

.Byte 

.Byte 

.Byte 

.Byte 

.Byte 

• Byte 

.Byte 

.Byte 

.Byte 

.Byte 

.Byte 

.Byte 


1 2 . + 80 , 05 . + 80 , OS . , 12 . 

12 . . 12 . + 80 , 12 . , 05 . 

06 . , 06 . . 1 2 . . 1 2 . 

07 . + 80 , 1 2 . , 06 . + 80 , 1 0 . 

12 , , 08 . , 12 . , 12 . 

•j -~i i O j 9 ' 1 V 

1 2 . 1 1 2 . * 06 . + 80 , 06 . +80 

i U b 1 T t JJ i U ( , i a “I- Q i.J 

1 9 1 o 1 9 1 9 1 9 1 9 1 9 1 9 

1 O ' np ' •} •} ■} 9 in ■{ -n -j o i n 

X X~ o * v - J t: i| 1 i a ^ ii. c ^ X .4. :: ; I.L. c ^ i c s a. X_ u 

12 . , 12 . , 12 . , 12 . , 12 . , 12 , , 12 . , 12 . 
10 ., 12 ., 10 . , 08 ., 10 . , 08 ., 12 . , 12 . 

05 . . 12 . . 1 1 . . 1 1 . . 1 1 . . 12 . . 10 . . 1 1 , 

11 ., 08 , , 09 ., 10 ., 08 . , 12 . , 11 . , 12 . 

' ll . ,11 . ,11 . , 12 . , 11 . , 12 , , 12 , , 12 , 

10 . . 12 . . 10 . .09 . .05 . .09 . . 12 . .00 , 


60--67 


... 

i V f i 

78-7F 


VeryEnd 


End of part 1 
end o+ tile, 11 


Page 68 


cn ci i cat - jK't i- j oo cum cjcjcjc mhmw 

+1--J ~n-.j no-- joi "hto-ucj n-..: n-j m.j -t-= ...= n to -j to 



- — FILE . i2 


Printer Definitions Work Ansa 

Part II ot seg.pr source code. 

; Book SegF’rl . Beginning of printer tables. 

: Point at tables for each of the printers. Printer 


5 Dots per 
PrATabl e 


Dots per 


•inter is number 

1 on the pick 

your 

type menu 

.Word 

0 

P 

No type 0 

.Word 

Pr AT ab 1 e 

3 

Add 1 a DMP 

.Word 

Pr ATab 1 e 

jl 

Apple I mag eWr i t er 

.Word 

PrCTabl e 

3 

p 

Apple DWP 

.Word 

PRDTable 

Apple Si 1 an type 

.Word 

PRSTable 

3 

cpson MX 

.Word 

PRHTabl e 

p 

Epson MX Sr aft rax 

. Word 

PR I Table 

3 

Epson RX 

.Word 

PRFTabl e 

? 

Epson FX 

.Word 

F'r 1 ao 1 e 

3 

Qume sprint 5 

.Word 

Pr-W e ab i e 

* 

3 

Glume Sprint 11 

.Word 

PrSTab 1 e 

3 

3 

Scribe 

.Word 

CustomTabl e 

3 

Customized . 

for Apple BMP . 
.Byte 

r«. . _ 

(Printer #1) 

O , 1 60 . , 1 44 . . 0 

3 ‘ fr * ? 

80 96.; , 120. ; 


.Byt 
.Byte 
. Bvt e 


I-j6 . u : 4i 

V ^ J. -«fD a ij 


,80. ,0,96. ,0,0,120. 


U . o . o . 0 


, 0,0 


:har 


acter for 

val id charactrers 

0 to 

■n n 
•£.*+ * 

.Byte 

0,0,0,0,16. 

, , 1 6 . 

,16. 

. Byte 

16. , B , 8 , U , b 

5 f) pi 

,8 

.Byte 

0,8,0,0,0,C 

1,0, 0 


.Byte 

(.) 




Addresses of command 
.Word 
.Word 
» Word 
.Word 
. Word 
. Word 
.Word 
.Word 
. Word 
.Word 
.Word 
.Word 
• Word 
. Word 
.B1 ock 


:rings for each possible chars per inch 
0 , 0 , 0 . 0 

PAT 4CPI-PrATab 1 e 
PA T5CP I -PrATabl e 
PAT6CPI -PrATabl e 
PAT7CP I -Pr AT ab 1 e 
PAT8CP I -PrATabl e 
PAT9CP I -PrATabl e 
PA T 1 0CP I — Pr ATab 1 e 
0 

PAT 12CP I -PrATabl e 

n , o 

PAT 15CPI -PrATabl e 

PAT 17CP I -PrATabl e 
14. 


3 r DMP, strings for outputting various command; 


.Word 

0 

e Zero is 

.Word 

$101 -PrATabl e 

; BB 

.Word 

$l02'-F‘rA1 ab ! e 

e BE 

.Word 

$103-PrATabl e 

” HR 

.Word 

'$■ i ij 4-PrATab 1 s 

; PE 

.Word 

$105-PrATab1 e 

; MB 5 

. Word 

$ l 06— Pr AT ab 1 e 

; ME 

.Word 

$ 1 0 7 -PrAT ab 1 e 

5 UB 

.Word 

$10a-PrATabl e 

5 UE 

.Word 

$109-PrATabl e 

5 6LP I 

.Word 

$11 0-Pr AT ab 1 e 

e 8 LPI 

.Word 

$1 12-PrATab! e 

s Reset 

.Word 

$1 12-PrATabl e 

e I n i t 

.Word 

0 

• All CP 

.Word 

fill PrATabl e 

: Pi 

• Word 

$1 19-PrATabl e 

; p-i 

3 rx. 

. Word 

F'ATWidths 

5 DMP wi 


lerry port 


10 


; omman d ■; 


idth; 


■'age 


command 


! ! -O f t -O^t 

O Q3 ^ O CD t -4 r-4 


$-101 
$102 
$ 1 03 


$104 
$105 
; $ 1 06 
• Byts 


Method 

.Byte 


•for underlining 
1 


0 i none 


eg 34 


u-cui oo tract i ana i justxf ication 
.Byte True 


.Byte 
.Byte 
.Byte 
.Byte 
.Byte 
.Byte 
.Byte 
. Byte 


11 1 Si 


2 , ComEscape , ' . 

2 , ComEscape ,22 
■ ComEscape , 11 T" 

11 p ^ 


turn on bo! d 


ComEscape , 11 
Oft 


(I Q « ** D » 


OH 

5 , ComEscape , 11 f " ,0A,Com£scap 
5 , ComEscape , “ • 11 , ‘'o'' 1 » "B" ,0A 
7 , ComEscape , '• r ” , oA 
Come- 


ape , "A" 


■ rac 


: ion a ; 


_F 


$106 

.Byte 

.Byte 

.Byte 

.Byte 

.Byte 

16 , .ComEscape , "T" , "2" , "0“ 
ComEscape , "r" ,0A 

ComEscape, "T","!"," 2“ 
ComEscape , "t 11 ,0A 

ComEscabe , "A" 

$107 

.Byte 

2, ComEscape," X" ; under! 

$108 

• Byte 

2, ComEscape, "Y" ; Under] 

$109 

.Byte 

4 , ComEscape „ "A" , ComEscape , 

$1 10 

.Byte 

4 , ComEscape , "B" , ComEscape , 

$112 

.Byte 

.Byte 

8 , ComEscape . " < " , ComEscape , 
ComEscape , "t " 

$118 

.Byte 

3, OF .ComEscape "P" 

$119 

.Byte 

3 , OF , ComEscape , i! p " 

; Actual 

strings to cause vs 

rious chars per inch 

. 

. By t e 

3 ,0£ , Comtscape , "n i! 

PAT5CP.I 

.Byte 

3, OE, ComEscape . "N" 

PAT6CPI 

.Byte 

3, OE, ComEscape . "E" 

PAT7CPI 

.Byte 

3,( scape i c 

PAT8CP1 

.Byte 

3, OE, ComEscape, "Q" 

PAT9CPI 

.Byte 

3 ,UF .ComEscape „ 1 n 

PAT10CPI 

a Byt 0 

3, OF, ComEscape," N" 

1' 

.Byte 

3, OF , ComEscape , "E" 

PAT15CPI 

.Byte 

3 ,0F .ComEscape . "q" 

3 ,0F , ComEscape , "Q" 

17CI 1 

.Byte 


on 

end 


11 N * 


6 I p i f orward 
S 1 p i t orward 


, ComEscape . "A" 


; Dots per 
Hr S' i ab 1 e 


Dots per 


Addresses of 


continued next 


for Appl 

e Scribe (Printer 

#11) 


.Byte 


0,0,0 jOjO, 

80. ,0, 

{j 

.Byte 


. 

, 0 , 0 , -J 

,0,0 

.Byte 


0,136. ,0,0 

,0,0,0 

,0 

.Byte 


0 



icter for 

va lid 

char-actrers 

0 to 


.Byte 

.Byte 


0,0, 0,0,0, 
16. ,0,8,0, 

16 . ,0, 
0,0,0, 

o 

0 

.Byte 


0,8, 0,0,0, 

0,0,0 


.Byte 


0 



:ommand s 

■tr mgs 

for each po 

551 bl e 

chars 

.Word 

.Word 


0 , 0 , 0 , 0 , 0 
PST5CPI-Pr 

w i ab ? e 


.Word 


0 , 0 



• Word 


PST8CP I -Pr 

Slab I a 


.Word 


o 



. Word 


PST10CPI-P 

rSTabl 

0 

.Word 


0,0, 0,0,0, 

0 


.Word 


r,r‘- ~r f •-? ,-A p f r\ 

rST ab 1 

0 

.Block 


14'.““ ‘ 



: t page - 

— 





inch 


0-7 

8-15. 

1 6 . — 2 ; 


0-7 
8-15 . 
16-23, 

O ,4 


n-4 


1 1 — 1 < 


; For DHP, strings -for outputting various commands 



. Word 

0 

0 ; 

0 ; 

$l03-PrSTafa ! e 

zero is Terry port commands 


.Word 

BB 


. Word 

BE 


.Word 

PB 


.Word 

$i04-F'rS ! ab! s i 

$ 1 u5— PrST ab I e 

PE 


. Word 

MB 5 


.Word 

$ 1 04-PrST ab 1 e ; 

$107-PrSTabl e s 

ME 


.Word 

ue 


.Word 

$108-F'rSTabl e 5 

$109-F'rSTabI e 
$1 10-PrSTabl e ; 

Language="A" 

0 

UE 


.Word 

6LPI 


.Word 

.If 

.Word 

8LPI ; 10 


. Word 
• Ends 

.It 

Q 

, Lan g uag 0 \ ” A f 



.Word 
. Word 
• Endc 

$112 ? Just get 

$112 

Europeans set to longer paper 


.Word 
. Word 
.Word 

0 ; 

f) 

0 

A! 1 CPI commands 


.Word 

A - 

H 

No proportional for Scribe 

5 

Method 

for under! ming 0 

e none , see eg 34 

.Byte 

1 



Can do 
.Byte 

+ rac 1 1 on a 1 j ust if ic at i on 

Fal se 


$103 

.Byte 

2 , ComEscape , ’’ 


$104 

.Byte 

2,ComEscaDe, i, 2 !i 

2 , ComEscape , "y" 


$105 

.Byte 


$107 

.Byte 

2, ComEscape, "X" ; 

underl ine on 

$108 

.Byte 

v , ComEscape . i i 

Under . me eno 

$109 

.Byte 

2,Comhscape,"A" \ 

6 Ip i forward 

$110 

.Byte 

4 ,ComEscape , "T" , " 1 ! ' 

f! Q H * -Dir-. • 

^ O s; w" ! |3 $. 

-forward 



; Europeans 

have 1 anger 

.If 

paper . 

Language="F" 


$112 

.Byte 

.Ascii 

.Endc 

.If 

-,j . womEscaps 
"HI 685“ 

Language= a G" 


$112 

.Byte 

. ASC 1 1 

.Endc 

t r 
t i T 

fc , ComEscape 
"HI 728“ 

Language 35 " 1 11 


$112 

.Byte 

.Ascii 

.Endc 

6 .ComEscape 
"HI 728" 


j Actual str 

... H 9 to t O C 5. U 3 0 v 3 P I Q U 5 C H ? 3. r~ S DSP 1 H C h 


PST5CP I 

.Byte 

3 , 0E , ComEscape , " N " 


PST8CPI 

.Byte 

3,0E , ComEscape , "Q" 
3, OF, ComEscape, "IM" 


PS I 1 OOP I 

.Byte 


PST17CPI 

Pvf*cs 
b £? y L tr 

3,0F,Co(i jpe . "0“ 



s Hopefully, Sprint 11 
F'rWTable .Equ 

— continued next page 


same as DWF' 


; Dots per 
PrCTabl e 


l 120ths per 


Addresses 


$101 
$102 
$103 
$ 1 04 
$109 
$110 

$111 

•tiio 

•r J. X 


$116 


ch for Apple DWP, 

(Printer #3) 


_ C; v f P 

’.Byte 

0,120. ,120. ,0,1 
•» i ■ i j*\ *i 

Of) 190 190 190 * 0-7 

?0 1 ' ' ' . 1 
... . 1 — 1 II . 1 . - — t. It X t G B .1. V B 

.Byte 

0 , 120 . , 0 , 0 , 120 ; 

,0,0,0 

.Byte 

120. 

character for val 

id charactrers 0 

to 24, 

. Byte 
.Byte 

0,0, 0,0, 30., 24. 

IS ■} n j o ■ i i 

i 3 5 X e q :. a. x f 1 i a 

,20., 17. _ 5 0-7 

, 1 0 , , 9 , 0 , b ; 8~ 1 5 . 

.Byte 

0,7 ,0 ,0 ,i ,0 ,0 ,C 

, 1 0 jUuj 

.Byte 

cr 

| 24 cp 

f command strings 

for each possib! 

s chars per inch 

. Word 

0 1 0 , 0 . 0 

PCI 4CP I -PRCTab 1 

5 0-3 

. Word 

e 

.Word 

-PRC 7 ■ b 

8 

.Word 

PCT6CP I -PRCTab le 

.Word 

PCT7CPI -PRCTab! 

0 

.Word 

PCT8CP I -PRCTab 1 

0 

.Word 

Pc f 9 cF 1 —PRC I ah! 

0 

.Word 

PCI 1 0CP I — PR'C i ab 

1 - 

: tr 

.Word 

PCT 11 CP I -PRCTab 

1 e 

.Word 

PCT 1 2CP I -PRCT able 

.Word 

PCT 13CP I -PRCTab le 

.Word 

o 


.Word 

PCT 15CP I -PRCTab le 

.Word 

0 


.Word 

PCT 1 7CPI -PRCTab 1 e 

.Word 

0,0 


.Word 

PCT20CP I -PRCTab le 

.Word 

0,0,0 


.-Word 

PCT24CP I -PRCTab 1 e 

For ALB. strings for outputting 

var i ous commands 

. Word 

0 

; Initial ice Terry 

.Word 

$ 1 0 1 -PRC Tab! e 

: BB 

.Word 

$102 -PRCTab! e 

j BE 

.Word 

$103-PRCTab! e 

; PB 

. Word 

$104-PRCTab! e 

a p t p 

.Word 

$ 1 04-PRc i ab i e 

\ MB 5 5 

.Word 

f-103-PRCTahl a 

* Mp 

.Word 

(j 

; Do i t Qume • s way 

.Word 

0 

5 Do it flume's way 

.Word 

$109~-PRCTab! e 

; 6LP I 

. Word 

$ 1 1 0-PRCTab 1 e 

; 3LP I ; 10. 

.Word 

$ 11-1 -PRCTab le 

; Reset 

.Word 

$ 1 1 2-F'RCT ab 1 e 

Init 

.Word 

0 

; A! 1 CPI commands 

. Word 

$1 IS-PRCTabi e 

q El 

.Word 

$1 18-PRCTabl e 

S P2 gets PI 15. 

.Word 

PCTWidths 


.Byte 

OFF 

? Custom Underlining 

.Byte 

True 

j Fractional justifies 

.Byte 

2 , ComEscape , "S'- 


.Byte 

2 , ComEscape , "R" 


.Byte 

2, ComEscape, "D" 



pi 

cci 


l on 


.Byte 
.Byte 
.Byte 
.Byte 
. By t e 
.Byte 
.Byte 
.Byte 
.Byte 
• Bvte 


.Byte 


2 , L. O ill t_ s c e. p e , 1 1 U 1 ■ 

4,ComE='-=-= "• 11 


0 


4 , ComEscape, “L", "O' 1 
3 .ComEscape ,ComRetu 
ComEscape . 1 A 


‘S 

iOi a UUIlfL. 3' 

ComEscape , "L" , "0 ri 
ComEscape , "X" 
ComEscape , 
ComEscape , 

08 . jComEscape 
ComEscape , 11 $" 
ComEscape , " e” 


, o 

' I! i. 11 

i 

,irn 

ic y f i 


» p 5 


?» q » 


.ComEscape . : 

lie 11 » 4 I! II i, II ' 

r , w , d 

• 1 y » 


F. 13 . 


Need fa 4 X 


continued next page — 


; Actual 

st r 1 ngs to p 

PCT4CPI 

.Byte 
. Bvte 

PCT5CPI 

.Byte 

.Byte 

PCT6CPI 

.Byte 
, Byte 

PCT7CPI 

.Byte 

.Byte 

PCT8CPI 

.Byte 

.Byte 

PCT9CPI 

.Byte 

.Byte 

PCT10CPI 

.Byte 

.Byte 

PCI 11 CP I 

.Byte 

.Byte 

PCT12CPI 

.Byte 

.Byte 

PCT13CPI 

.Byte 

.Byte 

PCT15CPI 

.Byte 

.Byte 

PCT17CPI 

.Byte 

.Byte 

PCT20CPI 

.Byte 

.Byte 

PCT24CPI 

.Byte 

.Byte 


various characters per inch, 
iscape 

E , ' C Di SC . £ : "E" 

8 , ComEscape , "X" 

ComEscape , "X " , ComEscape , "E” 
8 ,ComEscape . "X" 
uomEscape , ' 11 . ComEscape , " v 1 
o , ComEscape , a 
C omEscape’, "X" .ComEscape , "E" 
3 = ComEscape 5 ' a 
C omEscape, "X" , ComEscape, "E" 
8 , ComEscape , " X " 

ComEscape , “X" , ComEscape , "E" 

0 a p e " X 

womEscape J A is , ComEscape . 11 l ■ 
S, ComEscape, "X" 

ComEscape, "2“ , ComEscape," E u 
3 , ComEscape , " X " 

ComEscape , "X " . ComEscape , "E" 
3, ComEscape, "X" 

.ComEscape , ”X “ .ComEscape , "E" 
S , ComEscape , "X" 

ComEscape , "X " , ComEscape , "E" 
8 , ComEscaoe , ” X " 

ComEscape , "X " , ComEscape , "E" 
3 , ComEscaoe , "X" 

ComEscape , "X " .ComEscape ,"E ,! 
3 , ComEscape , "x" 

ComEscape , "X" , ComEscape , "E" 


ii H 


If “I If 
5 


il 

9 


Jf 


H *1 If 
? X 



I! -j H 

5 i 


If •? 15 

? 


If 


1" 


If 

? 


, " 0 " 
, n 0 H 


? "4 


if 

if 


. "0“ 

»« 7 « 
i? ir >1 


II n 

it ►: m 

**o» 

11 o « 


I! p H 
V 0 


i! ri ii 
» * 



ii cr 11 
9 - 1 


5 Dots per inch for Apple Silentype, Basically 
PrDTabl'e .Block 25. 

; Table of dots used by characters at pitches, 
.Block 25. 


an SO column printers. 
Table runs from 0 to 24. 


; Commands for various chars per inch. This print doesn't know anv. 
.Block 50. 

; For various modes, Silentvpe ain't that smart. 

.Block 32, 


.Word 0 

•Byte 0 

.Byte 0 


; Widths 
I Under! ining 


— End of Part 2 

— end of file. 12 


•'age 


FILE, 13 


Printer Definitions Uork Area 


Part 


G T S © 9 >•- p i"~ 3 Q U. P C £ C Q G £ « 


i Dots per inch 
PrE lab! e 


or Glume 

and L'lahlu 

Byte 

0,1. 

Byt Q 

120 

Byte 

120 

Byte 

120 


16xx compat . [Printer 
'0 . . 1 20 . , 0 , 1 20 . ,120. ,12 
,120. 3 120. 5 120. ,120, ,1 

: ? 0 ? i 20 s ? 0 n 0 i 20 * , 0 5 0 y 0 


#1?) 
0. , l2i 


; 120 th s per 

character for 

valid charaetrers 0 to 24. 


.Byte 

U , U , U , 0 , 3u . , 24 . , jcO .,17. 3 


.Byte 

1 - 1 •• 1 9 1 1 1 A P A & 

X W 9 « A W 1 ! «j X Jim B If X X r. 1} X ■«' B IJ . B V r. c 


.Byte 

0 , 7 , O , 0 , 6 , 0 , 0 , 0 | 


.Byte 

•-« . 5 

; Addressee 

of command str 

ings for each possible chars per inch 

. Word 

0 , 0 . 0,0 5 


.Word 

PET4CP I -PrETab! e 


. Word 

PET5CF’ I -PrET ab 1 e 


.Word 

PE i 6 CP I -PrET ab 1 e 


.Word 

PET7CPI-PrETab! e 


, Word 

PET 8 CP I -PrE I ab I e 


.Word 

PET9CP I -PrET ab 1 e 


.Word 

°ET 1 0CP I -PrET ab 1 e 


.Word 

PET 1 1 CP I -PrET able 


, Word 

PET12CPI-PrETable 


, Word 

PET 13CFT -PrETab! e 


.Word 

0 


.Word 

PET .1 5CP I -PrET ab 1 e 


.Word 

0 


• Word 

PET 1 TCP I -PrETab 1 e 


.Word 

0,0 

PET20CP I -PrETab 1 e 


.Word 


.Word 

°,°,o 

PET24CPI -PrETab 1 e 


. Word 


For Glume , 

strings for outputting various commands 


. Word 

0 : InitiTaiz e Terrv 


. Word 

0 : BB 


.Word 

0 ; BE 


. Word 

$103~PrETabl e 3 PB 


.Word 

$104-PrETable ? PE 


. Word 

104-PrETa > .... 5 


.Word 

$103~Pr ETabl e : ME 


.Word 

0 ; UB 


.Word 

0 ; UE 


.Word 

$109-PrETab1e * 6 LPI 


• Word 

$ 1 1 0 -r'rETab s e 3 tsLPI lu. 


.Word 

$1 1 1 —PrE i ab 1 e 3 Reset 


.Word 

$ 1 1 2-PrE Table ; Init 


. Word 

0 3 All CPI command 


.Word 

$1 18-Pr ETabl e *. Pi 


. Word 

$ 1 1 8-F'rET ab 1 e ■ P2 gets PI 15. 


. Word 

Pci Widths s BWP widths 


a By 1 0 

OFF 3 Custom for Sums 


.Byte 

True ; Fractional just 

$103 

.Byte 

2 .ComEscaoe , "D" 

$104 

.Byte 

2 .ComEscape , "U" 

$109 

• Byte 

... ■ " '8' 

4 .ComEscape . , ”0" , " 6 " 

$110 

.Byte 

$111 

.Byte 

3 5 L O iTi E. S C 3 . D 0 * I A * *’ 1 *' 

$112 

.Byte 

ai e ?I L" . 1 : 


.Byte 

ComEscape ,0F 


.Byte 

ComEscape "E n « " 1 " , "0" 

ComEscape , "F" , " 6 “ , " 6 ” 


.Byte 


.Byte 

r ~ c r - -> i i p j ! ham ! i '■ * 

wUniC.bjL.Sp0 r, 2.. c V ;• 

$118 

.Byte 

6 , ComEscape . oE 


.Byte 

ComEscape, "E" , " 0 “ , " 6 " 
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0-7 
8- i S 
16-2 
24 c 


cp i 
i c p i 


pi 


:ian 


; Actual 
PET4CPI 
PET5CPI 
BbT 6 lP I 
PET7CPI 
PE i bCPI 
.. ... 
PET I OOP I 
PET 11 CP I 
PET12CPI 
PET i 3CP I 
PET15CPI 
PET 1 TCP I 
PET20CFT 
PET24CFT 


strings 


to print 

Byte 

Byte 

Bvte 

Byte 

Byte 

Byte 

Byte 

Byte 

Byte 

Byte 

Byte 

Byte 

Byte 

Bvte 


“ , u o m E 5 c a p 
~i v L- GiT'E. 8 C -3. P G 
. ... 

if s, UQHlEsC 3.p 0 
6 , UGmLBcape 
6 « u □ iii Escape 
o q L- cmTiE scape 
ij j. L D iT- L S C 3. p 0 
6 5 U O ITi E S C 3. p e 
o v • G XiE S C 3.p 0 
6 ? U Dliih S C 3. p 8 

& » Lr D iT £sc 3. p 8 
o a L- umE 5 c ci p 8 
i » L o n* l. s cape 


s per inch, 
a ' J t~ ? L- O iTl ‘z. S C 3. p 8 : 

,0F «ComEscape . 
, OF = ComE sc ap e 


if p »! 

««£*» ’ 
i ? r ~ i ! 


i ir i ! 


5 a w U ill C. 5 L. ct p te 

, OF .ComEscape 


c u F , ComEscape 
, ur ,uomtscape 
5 OF .ComEscape 
, Oh , ComEscape 
omEsc 


,OF,C 


spe 

, uF , comE sc ap e 
.OF ,ComEscape 


II ■} 
i. 

•} -j II 


.“E" 

' I? p » 

J"E"' 

•I 

! "E" 

' iipn 

',"E" 

up H 

l "E" 


’hoi. 

i ■— 1 
II •“? 13 


H -f II 

’ M ** 

, "U 

II f-v II 

' 

: “o 11 


, H o ** 


, " i " 

■ Up* 5 

i? 

' II OH 


31 IT If 

9 


PrFTabl e 


inch for Epson 

FX. 

(P 

r inter # 6 ) 

h ! a 3 

12 

CD 1 

a Iso 


.Byte 


0 

j 1 20 

. , 1 20 . 

,c .< 

,80 

. ,96 

* v O q 

0-7 

.Byte 


5 

36 . , 

0,80. , 

U , 7 6 

. ,0 

, 0,0 

5 

3-15 . 

.Byte 


o 

,136 

• , 0 , 0 , 

0 , 0 , 

0,0 


5 

16.-23. 

•Byte 


0 








character for 

val id 

charac 

trers 

0 to 

24 




.Byte 


0 

^ i 2 =• 

,12. ,0 

,0,1 

6 . , 

1*6 . ,i 

a 

0-7 

. By t e 


1 

J. 

6. ,0 

,8,0.8 

,0,0 

,0 



8- 1 5 . 

.Byte 


0 

P, ' 0 

? - 9 '* 

,0,0,0 

0 o 




16-23 . 

.Byte 


0 






24. 


; Addresses of command strings 
.Word 

• Word 
.Word 
.Word 
. Word 
. Word 
. Word 
.Word 
.Word 
.Word 
. Word 

• Bl ock 


for each pas 
0 , 0 , 0 . 0,0 
PFTSCPI-PrFTable 
PFT 6 CPI -PrFTabl e 
0 

PFTSCPI-PrFTable 

0 

PFT10CP I -PrFTabl e 
0 

PFT 1 2CP I -F'rFT ab 1 e 
0 , 0 , 0,0 
PFT ' 

14, 


idle chars per 
» 0-4 


inch 


6 double 12 

Double widith compress 

13-16 


For Epson FX , strings for outputting various commands 


.Word 

0 


Initial ise Terrv 

.Word 

•f 101 -Pr Ft able 


BB 

.Word 

f-102-PrFtabl e 


BE 

.Word 

$103-PrFtab1 e 

F'B 

.Word 

$ 1 04— F'rFtab 1 e 

«i 

«I 

PE 

.Word 

f-105-PrFtab ] s 

MB 5 

. Word 

iiu4— F'rFtab 1 e 

ME 

.Word 

$ 1 o?— F'rFtab 1 e 

4 

UB ; Requires 

. Word 

$108-~PrFtafo 1 e 


UE 

. Word 

$ 1 09-PrF t ab 1 e 

3 

6 LPI 

. Word 

$1 10-PrFtabl e 


8 LFT 5 10 

.Word 

$11 1-PrFtabl e 

4 

Reset 

. Word 

$1 1 1 -F'rFtab 1 e 

J 

Init 

. Word 
.Word 
. Word 

0 

$ i 1 4-F‘rFT ab 1 e 
$1 14-PrFTabl e 

4 

A I I CfI commands 

.Word 

PFTWidths 

5 

FX doss prop . 

• Byte 

1 

4 

Linder a! 1 s 

.Byte 

0 \ Fract 

i ona 1 j ust x f i c at i on 


pain in ass 


continued next page 


$ioi 
$102 
$103 
$104 
$ 1 OS 
$10? 
$108 
$109 
$110 
$111 
$114 

; Actual 

:: 

PFT6CPI 
PFTSCPI 
PFT10CPI 
PF 1 1 2CP I 


nuei ' 

.Byte 
.Byte 
.Byte 


page 


.Byte 
.Byte 
.Byte 
.Byte 
.Byte 
.Byte 
.Byte 
.Byte 

strings to ca 
.Byte 
.Byte 
.Byte 
.Byte 
Byte 


: , '.Jofnbscape , "S" 
i , ComEscape , "H" 

> , ComEscape . "S' 1 , "O" 
ComEscape . "T !i 
5 , ComEscape , "3" , !l 1 ” 

3 , ComEscape , "~ !l , " 1 " 

1, ComEscape,"-" , "0" 
.ComEscape , ”2" 

' , ComEscape , "u 
1 .ComEscape , ,ComE' 
S , ComEscap e , " a " , " 1 " 


turn on bold 
turn off bold 


: 6 1 pi 
■; 8 1 p i 
scape , " = 


v* 5. r i o u. s l. n 1 3. r 3 p £? y~ 

7, ComEscape. 


/ 5 L- □ tTi in £• C 3 p € <; 
/ -4 L G ffl in 3 C 3l p fi ^ 

6 , ComEscape , 
.ComEscape ' 


inch 

»n li 
F 7 

li I! 

» i-. » ' 

P 7 

11 r , 11 


pFTiTCPi 

.Byte 

6, ComEscape , "p 

; Dots per 

inch for Epson MX, 

(Printer #7) 

PrST ab 1 e 

.Byte 

0,0. ,0. ,0,0.80 


. By t e 

136. ,0,80. ,0,0 


.Byte 

0,136. ,0,0, 0,0 


.Byte 

0 


•i n _ \i n >> 

S 1 u- U I U in =• C d P fcf H 

, 12 , ComEscape - "M" 

7 


OF ' 


nhscape , "P 11 
v , .ComEscape , ” P 
0" ,12 ,ComEscape, "M" 
O'" , ComEscape . "F"‘ ,0r 


OE 

OE 

OE 


o.o.o 


0— 7 

8-15 


Dots per 


:ter for val id 

charactrers 0 to 24. 



Byte 

0,0, 0,0, 0,16., 0,0 

•1 

0—7 

Byte 

1 6 . , U , B , 0 , 0 , 0 , u , 0 

* 

8-15. 

Byte 

0,8, 0,0, 0,0, 0,0 


16-23. 

iByte 

0 

*1 

24, 


Addre-: 


ss of command strings for each possible chars per inch 


• Word 

0.0 ,0,0 ,0 

P6T5CP I -PrSTabl e 

h 

0-4 

.Word 


.Word 

0 , 0 

l 

6-7 

.Word 

PGT8CP I -F'rGT ab 1 e 

? 

Doub 1 e 

.Word 

.Word 

0 

PST 1 0CP I -PrSTabl e 


.Word 

0 , 0 , 0 , 0 , 0 , 0 

PST17CPI -PrSTabl e 

*t 

3 

J 

1 1 1 L 

xx i a 

. Word 

17 

.B1 ock 

■ 14, 

9 

18-24 

Far MX , 

, strings for outputting van 

ous c 

ommand' 


e widith compress 


.Word 
.Word 
.Word 
.Word 
.Word 
.Word 
. Word 
.Word 
.Word 
.Word 
. Word 
.Word 
.Word 
.Word 
. Word 
. Word 

.Word 
.Byte 
. Byte 


u 

$ 1 0 1 -F'r GT ab 1 e 
$ 1 02-F'rGT ab 1 e 
0 5 F'B 

0 ; PE 

0 5 MB 

0 ; ME 

0 | UB 

0 ■ LIE 

$109— PrSTabl e 
$1 10-PrSTabl e 
0 
0 


Initial ize Terry 
BB 
BE 

Sub , super 


requ i re 3raf tray 


Requir 

6LPI 

8LPI 


5 s pain in a 5 3 


0 

Q 

Q 

0 

•1 

0 


R 3£ 3 1 

In it 

A1 1 CPI commands 
not on hw 
not on HW 


wo prop 
Undera! 
Just 


for MX 


$101 

• Byte 

2 , ComEscape , " b ' 


turn 

$102 

.Byte 

2 .ComEscape , "H" 


turn 

$109 

.Byte 

2, ComEscape, ”2" 

£ 

6 1 pi 

$1 10 

.Byte 

2 , ComEscape , "0" 

r 

8 1 pi 


on bol d 
off bolt 


rontinued next page 
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— continued previous page 


; Actual strings to cause various chars oer inch 

e *( 3 T«%rpl Rwtt v 1 O AC 


■ CF I 

.Byte 

2 , 12 ,0E 



P 6 T 8 CPI 

.Byte 

2 ,0F ,0E 



PBT10CPI 

.Byte 

2,12, 14 



P6T1 7CPI 

.Byte 

2,14, OF 



. uats per 

inch for Epson MX wi 

ih Gra-ftrax = No 12 

cpi 


PrHTab 1 e 

.Byte 

0,0. ,0. ,0,0. ,80. ,0 

,0 ; 

0-7 


.Byte 

136. ,0,80. ,0,0,0 ,0 

,0 ; 

p_ 1 c. 


.Bvts 

0 , 1 36 . , 0 , 0 , 0 , 0 , 0 , 0 


16.-23. 


.Byte 

0 



j Dots per 

character for val id 

charactrers 0 to 24 

. 


.Byte 

0,0,0,0,0,16, ,0.0 


A- “I 


.Byte 

16 , , 0 , 8 , 0 , 0 , 0 , 0,0 

5 

8 — 1 5 . 


.Byte 

0 , 8 , 0 , 0 , 0 , 0 , 0,0 

s 

16-23. 


.Byte 

0 


24, 

; Addresse 

s of command strings 

for each possible c 

bars per 

inch 


. Word 

0 , 0 , 0 , 0 , 0 

Jl 

0-4 


.Word 

PHT5CP I -PrHTab le 




= Word 

0 , 0 

? 

6-7 


.Word 

PHT 8 CP I -PrHTab le 

; Doub 1 e 
1 

widith comp re 


. Word 

0 

Q 


.Word 

PHT 10CP I -PrHTab le 




. 8 ! ock 

12 . 

3 

11-16 


. Word 

PHT 1 7CP I -PrHT able 

c 

n 

17 


.Block 

14. 


18-24 


For Epson MX Sraftrax , str ing; 
.Word 0 

. Word $ i 0 1 -PrHTsb I e 

. Word $ 1 02-PrHTab I a 

.Word $103-PrHTabl e 

. Word $ 1 04-PrHT ab 1 e 

.Word $ 1 05-PrHT ab 1 e 

. Word $ 1 04-PrHTab 1 e 

. Word $ 1 0 7-PrHT ab 1 e 

, word $ i 08-F'rHTab 1 e 

. Word $ i 09-F‘rHT ab 1 e 

, Word $ 1 .1 0-PrHTab 1 e 

■ Word $111 -PrHT ab 1 s 

.Word $1 1 1-PrHTab! s 

.Word 0 ; A1 1 

.Word ' 0 ; not 

.Word 0 s not 

. Word 0 

.Byte 1 

.Byte 0 


k or 


outputting 
Initial ice 
BE' 


v a r i o u s c o it) id a r i d 


To 


erry 


BE 
PB 
PE 

MB 5 
ME 
UB 
UE 
6 LPI 
8 LPI 
s Keset 
Init 

CPI command; 
on hw 
on HW 


10 


No prop tor MX graftra* 
Just 


$101 
$102 
$103 
$104 
$105 
$107 
$ 1 US 
$109 
$110 
$111 


. Actual 
PHT5CP I 
PHT 8 CPI 
PHI 1 OCR I 
PHT17CPI 


string 


j Dots per 
Pr I Tab i e 


Byte 

2 , ComEscape ," 6 " 

j turn on bol d 

Byte 

2 , ComEscape , M H ,! 

j turn off bold 

Byte 

, comtscape *' z- : , . 


Byte 

4 , ComEscape , "T" j ComEscape , 

"H" 

Byte 

3 , ComEscape , "S" , ” 1 11 


Byte 

3 , ComEscape , l! - !1 , " 1 " 


Byte 

3 , ComEscape , , — 11 , V 


By t e 

2, ComEscape, ”2 “ 

; 6 l pi 

Byte 

2 , ComEscape , "0" 

s 8 1 p i 

Byte 

2, ComEscape 


to cause 

various chars per inch 


Byte 

1 ■-> AF 
z - 1 j-z- , ur. 


Byte 

2 , OF , 0E 


Byte 

2,12,14 


Byte 

2, 14, OF 


or Epson 

RX= Has 12 cpi also. Same as F 

X — propart i on a 1 

Byte 

O j 0 , , 0 . 5 O , O , SO , , 96 . j 0 

; 0 - T 

Byte 

1 i. A O A i \ £> L A ( i A 

2 _2 i_. ; a ^ 3 Cl :: « V ij CJ = q V 3 3 *_• 

\ O i a 

Byte 

0 y 1 36 a . 0 ? 0 ? 0 y 0 t 0 * 0 

; 16.-23 . 

Byte 

o 



inch 



Dots per char 


; Addresses of 


cter for val id 

charactrers 0 to 

.Byte 

U r: 0 , 0 , ij , o , 1 6 . . 1 6 

, Byte 

1 6 « , 0 , S , 0 , 9 , 0 , 0 , 

.Byte 

0,9, 0,0, 0,0, 0,0 

. Byte 

0 

ommand strings 

for each possible 

, Word 

0,0, 0,0,0 

.Word 

: ‘iT5CPI >rI1 s " : 

.Word 

P I T6CP I -Pr I Tab 1 e 


24, 


-Word 
.Word 
.Word 
.Word 
. Word 
.Word 
.Block 
, Word 
. B1 ock 


: 'r!Tab 1 


n 

PIT12CPI-PrITabl s 

PITiTCPI-PrlTabl e 
14, 


; 0-7 
; 8-15, 
5 16-2C 


. o 4 

b CP I -Pr I Table is d oub 1 e 
3aub!e widith compress 


13-16 
IB- 24 


5 

For Epson RX , 

strings tor outputting vario 


.Word 

0 ; Initial 


• Word 

$101-PrITabl e ; BB 


.Word 

$102-F‘rI ! abl e : BE 


. Word 

$103-PrI Table i PB 


.Word 

*104-PrI Table ! PE 


.Word 

$105-PrI Table 


. Word 

$104-PrI Table ; ME 

a CS 

.Word 

$107-PrITabl e ; UB 


. Word 

$ 1 uS-Pr I Fab 1 e ; UE 


. Word 

$109-PrI Table s 6LPI 


.Word 

$110-PrI Table ; 8LPI 


.Word 

$1 1 1-PrITabl e ; Reset 


.Word 

$1 1 1-PrITabl e s In it 


.Word 

0 ; A1 1 CPI commands 


.Word 

0 5 not on hw 


. Word 

0 ; not on HW 


.Word 

0 ; Not for 


.Byte 

1 s Under! ine 


.Byte 

0 ; Just 

$101 

.Byte 

2,ComEscape,‘'S" 

$102 

.Byte 

2,ComEscape, ,i H’ 1 

$103 

.Byte 

3 ,ComEscape , "8" , "0“ 

$104 

.Byte 

2,ComEscape , "T" 

$105 

.Byte 

3 ,ComEscape . "£" , " 1 " 

$107 

.Byte 

3 ,ComEscape , " 1 " 

$• 1 08 

.Byte 

3 ,ComEscape . , “0" 

$109 

.Byte 

2,ComEscape,‘ i 2" ' 

$110 

.Byte 

2, UomEsc ape , "0" 

$111 

.Byte 

2 , UomEsc ape , 


i erry 


Requi 


10 


res pain in 


turn on bold 
turn off bold 


6 lei 

a i w - 

W 1 p j. 


? Actual 

P1T5CPI 

PIT6CPI 

PIT8CPI 

PIT 1 OOP I 

PIT12CPI 

PIT17CPI 


j Dots per 


strings to cause various chars per inch 



.Byte 

: 

,ComEscape 

p ! f 

,0E 


.Byte 

4.12 

,ComEscape 


, 0E 


.Byte 

4 , uomtscape , “P 

" , OF 

, uE 


.Byte 

4,12 

,14, uomEsc 

S.p£ * 

*P" 


.Byte 

4,12 

, 14 , ComEsc 

ape , 



.Byte 

4,14 

.ComEscape 


, OF 

■ inch 

for Custom 

printer 




e 

.Block 

500 . 

; Just 

1 ea 

ve i 

Part 

3 





lie. 

13 







FILE. 26 


tieq.pr pef ini 1 1 on Module 


This book defines the area that comes in -from seg.pr. 
wp/print, db/rwseg, and ss/print, and ia11/seg34. 


. t, ii 


ssd 


WATCH OUT. IF much is changed be 1 ov? , must change LF'r-Fixed in i al 1 /common , 

************* **************** * 

ALL THE FOLLOWING TABLES MUST BE IN SOME SORT OF ORDER, AS THEY 
ARE BULK MOVED INTO THE AREAS. 

Table of spacing intervals for various printers. 

Values are for 9, thru 17 epi. All values are based on non-proportional 
letters taking B increments, values 1 and 2 are for proportional 1 and 2, 
These are default values. Can be overridden for specific printers. 


; Dots per 
DP I Table 


inch for 0-24. CPI 
.Equ 


Pr AreaSt art 


; Set by call 


; Table of dots used by characters at pitches. Table runs from 0 cpi 
I to 24, cpi. 

OPCTab 1 e . Equ DPI Tab 1 e+25 . 


; Table of words that point to commands that initiate various characters per 
; inch. If zero, not avail-able on this printer. Shouldn't happen, 

CPIComms .Equ DPCTabl e+25. 

Jress js proper command the selected 1 nter. 

printer can't do it. Value of <= FF is a Specii 
; routine number. For control codes 00-15. value of zero means it can't be 

; oone >. 

Control Codes .Equ CF‘IComms+50. 


a 

:flu 


■ C.GU 


Control Codes+32 . 

5 Point at table of sizes, if any for this printer 
CSPointer .Eou uCEnd 


Which method is used for paps 
ULMethod .Equ 

FracJust .Equ 

— end of file. 26 


ICEnd 

n _ length c omman d s 
inter - * 2 
ULMsthod+1 


; Boolean, can do it. 


or 


0 . Q 0 



FILE. 14 


How AppieWorks utilizes //gs memory manager 


AlL //gs memory is managed by a portion at the toolkit called the Memory 
Manager, written by Rich Williams. 


progr . act as AppieWorks, must run at specific locations ■. 
the machine, such as most ot the first 64h, and portions of the second 64k . 

The memory manager originally starts with all of the RAM to manage, 256K on a 

basic gs, and 256k' + 1024K on a gs with a 1 meg memory card. 

Here’s what happens to the memory: 

During a cold boot, small portions of Ram, probably less than 32K, are 
requested by other toolkit modules. 

A; so during tne cold boot, the RAMDisk is defined, but the actual memory 
allocated is based on the "minimum amDisk size" chat has been specified in the 
control panel. If this minimum is zero, then less than 1GK bytes are actual 1 y 
al 1 ocated . 

When AppieWorks boots, most of the first 64k of the gs, and portions of the 
second 64 k, are reserved by AppieWorks for its use. This is done by making 
calls to the memory manager to reserve these specific areas. 

At this point, very little of the RAM has been taken, and all that remains is 

considered, by AppieWorks, to be available for desktop. It is important to 

note that the RamDisk also thinks that this exact same unallocated Ram is 
available for extension of the RamDisk. This is one of the most powerful 
features a* the gs toolkit. 

The xxxk available stated by AppieWorks is the sum of; 

K unallocated by the memory manager, plus 
K that AppieWorks owns, minus 

K that AppieWorks owns, but contains the files that are currently on 
the desktop. 

As the user runs AppieWorks, and other programs , the unallocated Ram gets 
consumed by either AppieWorks, or the RamDisk, or other programs. 

While AppieWorks is booting, it offers to preload the entire program. If the 
user allows this, AppieWorks acquires about 160K of Ram, from the memory 
manager, adding tnis memory to the pool owned by AppieWorks. Because of this 
feature, there are less reasons to copy the AppieWorks program files onto the 
RamO i sk . 

The AppieWorks owned pool consists of three types of Ram: 

1. Files that appear on the desktop. 

2. Portions, or all of, the AppieWorks program. 

3. Free space 

As in all earl ler versions, AppieWorks will remove portions of itself from its 
pool if the space is needed to store data files. 

There is a known bug in the RamDisk: If the RamDisk asks for a block of 
mernoi y . rom the memor y manager , and none is avail am e, the RamDisk wx 1 1 crash 
the whole system. 

The solution •'•or this bug, for AppieWorks users who also want to use the 
Ramdisk , is to have enough Ram so that the RamDisk can be initialized to a 
‘‘minimum" that will almost always cover their potential use. 

— End of file. 14 
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FILE. 16 — 


Bugs and conflicts in Appl eWorks version 2.0. 

Thanks to the people that have reported these problems. 


During startup, Appl eWorks on a //gs sets the screen control byte at C035 
to iE . indicating that Appl eWorks needs only the 30 column text screen. 

It a later desktop accessory subsequently wants to use the graphics screen, 
the gs memory manager has already al 1 ocated the graphics ares -for other- 
uses, and can't make the space available for display. 

We do not have a recommended solution for the problem, and we would 
appreciate suggestions for changes to be made in Appl eWorks to resolve the 
probl em . 

2. The screen control byte is set to IE during startup . When Appl eWorks quits 
it should be set back to its original setting, but this isn't done. 

Programs that follow Appl eWorks without rebooting may find that the IE 
setting conflicts with the programs need to do graphic screen display. 

3. You can't enter Control as a custom printer code. This bug may cause a 
change in AfReadTest in hooks (File 4). 

4. Apple's //gs memory card is limited to i meg. Other vendors have 
subsequently gone much higher. Appl eWorks 2.0 crashes if there is 4 meg or 
more. This will be fixed within 6 months, and we'll distribute a patch for 
the Startup disk if anyone actually buys 4 meg in the meantime. 

5. There are to 'other known ..-.-..gs in the memory management software . If you 
know of one, we would sure like to hear about it. 

— End of file. 16 



FILE. 21 


LAN 2.1 fialn Liork Area 


; Equates and definitions used throughout AppleWorks. 


; This tile i 

s included in each 

! App 1 eWork s segment. Other developers may be 

; interested 

in the individual 

components. $600 byte work area defined here 

; Parameters 

that control assembly. Combined refers to whether the segments 

; are combined into one file. 

They are for distributi ion , are not for my 

i i~est i ny . 



Combined 

• Equ 

1 5 J. or 0 , bool ean 

Cr i po 1 ed 

. Eq u 

0 

Language 

.tqu 

II A II 

M 

LAN 

.Equ 

o 

Testing 

.Equ 

o 

Warn Em 

• Equ. 

0 ; 1 or 0 5 warn msg on sp 1 ash 

OAKey 

.Equ 

SO 5 Open apple adds this 

DateCode 

.Equ 

192. 


Environment record information 

ERELength 

.tqu 

36. ; Length of ER Printer entry 

EROFormF eed 

.Equ 

SO 

LROF’ageStop 

. Equ 

5.0 

EroNeedLF 

.Equ 

20 

F a i se 

.Equ 

0 

•1 

Bits to tsi 1 Wr 

iteVBar (VBarWrRtn) to write relative 


to top left of 

box 

FCLef tSide 

.tqu 

SO 

FCTopLme 

• Equ 

SO 

Indent 

.Equ 

SO ; Flags Indent needed 

LPrF i x ed 

.Equ 

136. ; Fixed area in printer defni 

|V I axOnDes k 

.Equ 

12, 

01 dCode 

.Equ 

207 . 

PosSegs 

.Equ 

4 Li s 

PosBegsX4 

.Equ 

172. 

ScreenWidth 

.Equ. 

SO. 

TimeCode 

.Equ 

“ i 9 

2. 2- E 

True 

.Equ 

1 

TurnOnAStack 

.Equ 

0C009 

Turnuf AStack 

• Equ 

ocoos 

ZP 

.Equ 

0 ; For Mac conversion 

l Items that 

Luntro i size of wo 

rk areas, depending on machine size. 

SmDBRecs 

.Equ 

1350. 

bmWPfiecs 

.Equ 

2250 , 

Smbbb'A 

• tqu 

1 

LrgDBRecs 

. .Equ 

63 5 0 b 

LrgWPRecs 

.Equ 

7250 b 

LrgSSBA 

.Equ 

i 0000 , 
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; Items that control assembly -for -foreign languages. 


KCommalnNo 

.Equ 

it il 

1 


RDatebep 

= L q u 

H *• li 
/ 


KDecPoint 

.Equ 

Is il 


KCurrency 

.Equ 

"j" 


KVertBar 

.Equ 

il { II 


No 

V r-v.— 

.Equ 

Cm i 

"N" 

H V » 


i 

ComAl t iHe ! p 

a U. LA 

.Equ 

I 

" / " +OAKey 


Com A] t2Hel p 

.Equ 

"/" +OAKey 


ComAl t3He • p 

.Equ 

" /"+0AKey 


ComCI r-2End 

.Equ 

•nc 

O.- 1 s 

; Control -Y 

ComEditMode 

.Equ 

" E " +0AKey 


ComEndSC 

.Eau 

If •• II 

; To end printer special codes 

ComHel p 

.Equ 

"?"+QAKey 


ComHardCopy 

.Equ 

"H"+OAKey 


ComQuick 

.Equ 

" Q " +OAKey 


ComSave 

.Equ 

"S"+OAKey 


L. as t l u C n a r 

.Equ 

li If 


LastUCChar 

.Equ 

ll J ll 


StdPL 

.Equ 

110. 

{ Standard paper length 

KSFMark er 

• Equ 

ii ••• i; 

; To display WP special functions 


; Hor and vertical for 

consol e 

dr i ver . 

Used in SubHost too. 

CH 

.Equ 


14 

; Position rel to top left 

CV 

.Equ 


1 C-, 

; Position rel to top left 

KOAChar 

.Equ 


pi 


KMouseReturn 

• Equ 


SB 


A 

First 

the items 

that are 

common between all files 

F l 1 eBuf 

.Equ 


0800 


Host WA 

.Equ 


0A00 


LHostWA 

.Eau 


60U 

; Length 

HostLocn 

.Equ. 


1000 

LSane 

• Equ 


2100 

; Apple SANE numerics package 

Ltl em 

.Equ 


0D000 

\ Apple el emen t ary f un c t i on s 

LHiSane 

.Eau 


•} 


L.H i El ems 

.Equ 


000 


LZPBane 

.Equ 


occ 

j Beg of 34 zero page loons. 

LHiEl em 

.Equ 


' 

LSubHost 

.Equ 


0B000 


DDWA 

.Equ. 


7500 

5 For disk directory work 

SBWA 

.Equ 


7800 

DBWA 

.Equ 


7B00 


WF'WA 

.Equ 


7B00 


; Equates for 

rel stive 

addresse 

s of main 

modul es 

LOrgMain 

.Equ 


2100 


LSSMain 

.Equ 


6F00 


LBBMain 

.Equ 


6 BOO 


LWPMain 

.Equ 


6E00 


LHiOrgMain 

.Equ 


•> 

jL x 


LHiSSHain 

.Equ 


6F 


LHiBBMain 

.Equ 


6B 


LH i WPMa i n 

.Equ 


6c 


; Equates for 

re ■ at i ve 

addresses of segments for each system . 

LQrgSegs 

.Equ 


4000 

; 1 .3 changed from 6300 

LSSbegs 

.Equ 


3900 

LBBSegs 

.Equ 


3900 


LWPSegs 

. Equ 


2100 


LSSOverl ay 

.Equ 


5200 


LHiQrgSegs 

.Equ 


40 

; 1 .3 changed from 63 

..Hi SS Sags 

.Equ 


39 


LHiDBSegs 

.Equ 


3 7 • 


LHiWPSegs 

.Equ 


~ i 


LH i SSQver 1 ay 

.Equ 


CT-” 


I I Ha i nBase 

.Equ 


' 8FO0 

; First storage avail in main 

I IHiMainBase 

.Equ 


8F 

i i Au;< Base 

« Equ 


0800 

; First storage avail in aux . 

I i H i Auk Base 

«Equ 


6 


H 5 Q 0 HH 



; The pathnames 
Path Area 
MainPathName 


OFPathName 

CodePathNsme 

ERMainPathNan 


are new t uu at ions tor k . 1 
• tqu OBAOO 

.tqu PathArea 

It HardPath is 0, then use 


jnd 2.1 LAN 

. string 
this Pathname . 


I f Ha^d 
.Equ 
.Equ 
.Equ 


0 5 then this is just 
Ha i nPathName +50 . 
UFF'athName+50 . 
Cod ePathName +50 , 


>r display. 

; User to! der Pathname 


Far 


■e bank addressing 


iOBuf f er 

.Equ 

0BB00 

F'DDevGntMl 

.Equ 

0BF31 

PBBevLst 

.Equ 

0BF32 

Max SSRows 

. Eq u 

Q99 

Rd Main 48 

.EQU 

00002 

RdAux 48 

.EQU 

0C003 

WrMain4S 

.EQU 

0C004 

Wr Aux 48 

.EQU 

0C005 

RWAux 1 6 

, eqij 

OC009 

RWMainl6 

.EQU 

0C008 . 

; Type codes -for numer 

i l_ j 3 C r •. 3 Q ~ 

FFExt 

.Equ 

o 

FFDbl 

. Eqii 

1 

FFInt 

.Equ 

4 

; Op codes for 

numerics package 

FOAdd 

.Equ 

0 

FOSetEnv 

.Equ 

1 

FOSub 

» Equ. 

It! 

FOSetEnv 

.Equ 

3 

FDMul t 

.Equ 

4 

FQDiv 

.Equ 

6 

F0B2B 

• Equ 

9 

F0B2D 

. Equ 

OB 

FQSQRT 

.Ecu, 

12 

FuRTI 

• Equ 

14 

POTT I 

.Equ 

16 

c ' QL 1 ass 

CT,-i i | 

n lQU 

1C 

FOABS 

.tqu 

OF 

FOCMP 

.Equ 

08 

F QNeg 

.Equ 

OD 

F0Z2X 

.Equ 

OE 

FOX 22 

.Equ 

10 

LExtNum 

.Equ 

10. 

I And opcodes 

for Elems package 

FGXPwrY 

■ Equ 

^ **n 
i -C. 

; Application 

call codes. Host will pi a 

; calls to the 

individ 

ua 1 Ma i n rout i nes , 

; the proper modal es 1 

a 

oaded for this, bu 
Return 

hCC i oseF i 1 e 

.Equ 

1 ; Cal 

ACInitFi 1 s 

.Equ 

2 • Cal 

ACMergeF i 1 s 

.Equ 

S3 s Hos 

ACNewFrkb 

. i™. q Li 

84 ■ Hos 

ACNewFrCB 

.Equ 

85 ; Hos 

ACOpenFi 1 e 

.Equ 

6 : Cal 

ACRel easeFil e 

.Equ 

7 t Cal 

ACResumeF i 1 e 

.Equ 

So‘ 5 Hos 

JOFailed 

.Equ 

ZP+003 


Val ues temp room tor Subtlest . 

5 ProBOE devices attached 
; ProDOS devices attached 


Round to 
Truncate 

Absol ute 
Compare 


integer 
to integer 


ce these val ues in X when making 
A high bit added means to just get 
t not cal l ed . 

Ter, put back in banks, release WA. 


, is in WA , 


needs pointers ini ted 


ipboard . 

from banks, 
ease the bank 


‘ , Get 


does in it 
switched , 


already in work area, init dons 


int inued next page 



continued previous page 


5 

All of 

the fol 1 

owi 

ng depend on whether or not 

I 

is work 

ing . 



ALVDBMHP 

.Equ 

ZP+004 

3 

A(Ptr for maximum record ) 

ALOWPMMP 

.Equ 

ZP+006 

J 

A (Ptr for maximum 7 ine) 

HtndBSWA 

■ equ 

ZP+OU8 


A (Last byte of BldReeWA) 

MaxDBRecs 

■ Equ 

ZF'+OOA 

3 

Ms x i a 1 r ec s al 1 01 fee i n DB 

MaxWPLines 

. Equ 

ZF'+OOC 

3 

Maximum lines allowed in WP 

Max bbRb ice 

.Equ 

ZP+00E 

3 

Maximum record size in SS 

Aux Reg 

.Equ 

ZP+080 



CDfiddr 

.Equ 

ZP+080 


. Used by consol e 

CurHor 

.Equ 

Z P+082 


j Cursor ’ posit i on 

CurVer 

.Equ 

Z P+083 


; Cursor position 

CWork 1 

• Equ 

ZP+084 



SpaceOK 

.Equ 

ZP+0S5 


; Cleared, set by : 

FoundCommand 

.Equ 

Z P+086 



FoundReturn 

.Equ 

ZP+ 0 S 7 



FoundEscape 

.Equ 

Z P+088 


; Non zero if esc a; 

He! pAvail 

.Equ 

ZP+089 



T 

X 

.Ecu 

Z P+08 A 



IntFrKB 

.Equ 

ZP+08C 


; numeric 

LLp 

.Equ 

ZP+OSD 



LLB 

.Equ 

ZP+08F 


; is a word 

; Work area -for 

Mul tipi 

y 



MReg 

.Equ. 

ZP+09 1 



MWrk X 

.Equ 

Z P+093 



MWrk T 

3 h q u 

ZP+094 



PageBegin 

-Equ 

Z P+095 



PageEnd 

.Equ 

ZP+096 



Return Code 

.Equ 

ZP+097 



; Return 0 throu 

igh Z Reg 02 must 

bp 

m order 

RETURNO 

.EQU 

Z P+098 



RETURNS 

.EQU 

ZP+09A 



AArg 

. Equ 

ZP+09 A 



RETURN4 

.EQU 

ZP+09C 




ink 


BArg 

Z Reg 00 

CArg 

ZReg02 

DArg 

h'l 

Ex i tF 1 a g 


,Equ 

.Equ 

.Equ 

,Equ 

.Equ 

.Equ 

.Eau 


ZP+09C 

7F+09F 

ZP+09E 
Z P+0 AO 
ZF'+OAO 
Z P+O A 2 
ZP+OA4 


HAS OA-Q or 
to bail out 


0A- 

of 


■S thi 
the c 


± caused it 
urrent tile 


Work 1 

.Equ 

ZP+0A5 

FR 

.EQU 

ZF'+oAc 

FBR 

3 

.Equ 

ZP+0D0 

; These are 

output to 

the screen 

Cl eartLine 

.Equ 

i 

Cl earLine 

.Equ 


Cl earVP 

.Equ 

O 

Cl earEVP 

• Equ 

4 

AbsPosn 

■Equ 

5 

Left 

.Equ 

6 

Right 

.Equ 


up 

.Equ 

8 

Down 

.Equ. 

9 

Inverse 

.Equ 

10 . 

Normal 

.Equ 

11 r 

VPBot 

.Equ 

12 . 

Return 

■ Equ 

1 ‘“3 

VF’Top 

.Equ 

14 . 

v'PReset 

• Equ 

15, 

Reset VP 

.Equ 

1 5 , 

Bel 1 

. Equ 

16. 

HorShif tVP 

.Equ 

1 

A in 


:odas ; For My ConsDriver 


it ine 


continued next page 


page 


rontinued previous 

se are input codes, some output too, 


ComCurLef t 
ComLurRight 
ComCurUp 
ComCurDown 
ComTabLef t 
Com i ab Right 
LomEsc ape 
ComDel Key 
ComReturn 


• EQU 
.EQU 
3 

.Equ 

.Equ 

.Equ 

.EQU 

.Equ 

.Equ 


21 , 
1 1 , 
10 , 


?F 


uomLineFeed 

ComFormFeed 


.Equ 10. 

•Equ 0C 


But t er 


• Equ 


HostWA 


K1 ip Board 

; KBHigest 
; .WP: The 
; D8: The 
KBHighest 
KBType 


CurrFNo 


DTCurOpen 

DTCtOnDesk 


DTFName 

D IF Type 

DTFStatus 

DTFF'icksd 

BTFSisek 

DTFAddress 


stuff for the clipboard, 
c : sa -ed as one b : pck of 
But f er+80 . 


A1 1 the 
as it is 
.Equ 


s n i . at be i «een ap p I i c at ions 

count of items on the cl ipboard 
highest place used, values from 0 - 2: 
•Equ K! ipBoard+512. 

.Equ KBH'ighest+2 

End o- ; what must be in. order 


Th < 


must 
bytes . 


b e 


m order 


j , i u ; 

1 ype 


place used) 
data LOT or M 


.Equ 


KBType+1 


Stuff for organizer 12 items on des 
CurrFNo+ 1 
DTCurOpen +1 


.Equ 
* Equ 

The file that 

.Equ 

.Equ 

.Equ 

.Equ 

.Equ 

.Equ 


des 


is actually open on the 
DTCtOnDesk +1 
DTFName+21 . 

DTFType+1 

DTFStatus-M j Boolean 

1 . 3 

DTFSizeK+2 ; Bank 


32 bytes 


Picked for sav 
: bytes 
not curr 


hanged to 
address if 


DTFPo inters 

Fie! dName 

FoundSpace 

HardPathName 


? Lost4Ever 
; first two 
« as r ar as 
1 ■ s t ■ sr 


Pointers to the bank switched places where the up to 
12 fi'es are stored. When one is removed, all higher 
are moved down so that the n that 
Leave the first unused , 


. Equ 

.Equ 

.Equ 

.Equ 


e 

prQ 


used to fa 
byte 
Appl eWork 
.Equ 


DTFName +32 


are in, are contiguous, 
that accum will point right 


DTFPo inter s+26. 
Fiel dName+21 . 
FoundSpac 
,* Erodes 


s+ 1 


DSSS0000 dei 
; zero, use this to fi 
5 SOS value 01 to 06, 
MainPathName. Suggested conven 
Remaining 30 are completely a 
is concerned. 

H ar d Pat h i N ame+ 1 


1 c 
nri a 
! ocn 
tion 
vail 


number 
file 
of f i 
LBB 

abl s 


. If non 
cats.! og 
1 e cat . 

,- e 


; Following is new for 
User ID .Equ 

LaunchLev .Equ 

— continued next page 


. 1 and 2 . 1 LAN 

Lost4Ever+2 

UserID+9 


string max 1 en=8 tie, 9 bytes) 
One byte 



— continued previous page 


; Where we ? 

;eep the stack 

of 

routine names _ 


CurrMode 



Lost4Ever+32 . 


Stack K i 

.Equ 


CurrModa+2'1 . 


StackF'2 

.Equ 


StackF'i+Ll . 


Stack P8 

.Equ. 


StackF'2+126 . 


NewF 1 1 e 

.Equ 


Stack F‘S+2'1 . 


Newstr 

.Equ 


ew ■ i ] s l 


01 dStr 

.Equ 


NewStr+ 1 28 . 

5 Max length 127. 

OneChar 

.Equ 


01 dbtr+128 , 

QrglnMem 

.Equ 


OneChar+i 

; Organiser in memory 

Sac ;-‘DNo 

.Equ 


OrglnMem+I 

R2 

.Equ 


RacF'DNo+ 1 


R3 

.Equ 


R2+2 


Saved Hor 

.Equ 


R3+2 

; MUST be Hor , then ver 

SavedVer 

.Equ 


SavedHor+ i 

SegNum 

.Equ 


bavedVer+ i 

!j BUS on i • segment number 

SMAddrO 

.Equ 


SegNum+1 

5 

WVVAddr 

.Equ 


SMAddr2+2 

WVVCount 

• Equ 


WVVAddr+2 


al e 

.Equ 


WVVCount+2 

l X, Y, Length, entries 0 

VTHighest 

.Equ 


Vert Tab! a +9 3. 

; Highest entry in table 

Work 2 

.Equ, 


VTHighest+1 


Work 3 

.Equ 


Work 2+2 


; Environment record has 

s t a r 

t. i ng f i ] e cab i net. 

, and prints'' specification 

; IF ANY OF 

.THIS. CHANGES, 

YOU 

HAVE TO CHANGE S 

EGF'R , WHICH CONTAINS 


E THE INITIAL VALUES FOR ALL OF THIS 


EnvRec 

.Equ 

Work 3+3 



ERHardPathName 

.Equ 

EnvRec 



ERAvai 1 

.hqu 

ERHardPathName + 1 j 

Avail 2.1 


ERPtrCount 

.Equ 

ERAvai 1 +32 . 



EROAWPrinter 

.Equ 

ERPtrCount+1 

; 6-3 


ERMainPr inter 

.Equ 

EROAWPr i n t er + 1 

? 0-3 


■ ■ ■ »r 

• Equ 

ERMa i nPr l n t er+ 1 



ERToday 

.Equ 

ERCurrPr i n t er+ 1 



tRt i 1 1 erl 

.Equ 

ERToday+9 ; String 

Normally Cl] 

SON 

j The following 

is repeated three times 




E.R p t rName 

.Equ 

ERF i 1 1 er 1 + i U . 



ERDr i verName 

.Equ 

ERPtrName+ 16, ; 

Nad a on / J e , 

C Od©5 




to in it port 

on / / c 

3 Next says spec 

rules for //c (c) , //e 

is) . or on disK (c 

) 


ERSpecOn 

r~ . . 

*tqu 

ERDr i verName+ 15. ; 

Where custom 

made « 

ERBeviceNo 

.Equ 

ERSpecOn+1 i, 

Or si ot or FF 

( d i sk 

ERPtrType 

.Equ 

ERDeviceNo+1 



ERQptions 

.hqu 

ERPtrType+1 ; 

Bool ean 


ERPi aten 

.Equ 

EROptions+1 



EnvRecEnd 

.Equ 

ERF‘trName+ 1 08 . 



; End of part of 

environment record in 

memory . 




; Amount to move into memory at startup 
EnvRecALength .Equ EnvRecEnd-EnvRec 

r So other segments can get past the environemtn record on disk 
I 50 added for new position of ERMa i nPathName (after third printer) 
EnvRecRLength .Equ EnvRecALength+50 . 

DlOOLength .Equ 300 ; Space saved in Seg.pr 


; Variabl es 

that spec 

ify current (Organ 

izer) file card, and position 

j of its top 

left corner 

DFCNumber 

.Equ 

EnvRecEnd 


DFCHorPosn 

.Equ 

DFCNumber+i 

3 Hor posn of left side 
; Incluedes preceding 2 so. 

DFCVerF'osn 

.Equ 

DFC H o r P o s n + 1 

; Vert posn of top left byte 


Boo 1 e 

an whether code is 

com i n g f ram Prof i 1 e 

CodeOnFive 

.Equ 

DF CVerPosn + 1 

5 Initial is zero (false) 
if Byte at 0BF06 (Pro DOS clock) 

mock Byte 

.Equ 

CodeOnFive+1 

L'SWVal ue 

.Equ 

Cl ockByte+1 

j 2 bytes, value of 36,3/ _ at entry 

Cl earing 

.Equ 

CSWVal ue+2 

: Boolean, ReadKB is for Cl earl A 

Pr 81 ots 

.Equ 

Cl earing+1 

3 //e, slots 0-7 valid for or, bool 

DidSwapDisk 

.Equ 

PrSl ots+8 

3 Boo ! ean , data disk m drive 1 


— continued next page 


— continued pre 

V 1 DU. 3 

page 



FI oppyList 

• Equ 

BidSwapDisk+1 


list of drives, like 60, E0. 




?■ 

For bGts } t irst P y t e is highest drive F , 




} 

like X"U2" , and remainder is not used 

LastDBPr inter 

.Equ 

opi .is' 



Last WPPr int er 

• Equ 

LastDBPr i nter+ i 



LastSSPr inter 

.Equ 

Last WPPr i nter+ 1 



' o d a y 

.Equ 

LastSSPr x n t er+ i 



S'] inkAddr 

.Equ 

Todays 20. 

? 

Value for x reg«, from BFF8 

SI ink SI ot 

• Equ 

SI inkAddr+1 



ConsDevNum 

.Equ 

81 inkSI ot+i 


PROBABLY AVAILABLE. 

I sLo ! 1 y 

.Equ 

CansDevNum+l 




; RamBisk driver address and device number 


RamDiskD 

.Equ 

IsLol 1 v+1 



KSfnU i sk N 

.Equ 

Ramu i sk D+2 



; Routine for when desktop is full 



BontBitch 

• Equ 

RamDiskN+l 



PEChar 

.Equ 

DontBitch+1 

5 

Char for bottom line. 

-KD 1 Ava i 1 

• Equ 

PEChar+1 

? 

1.3 Words Last K bytes available. 

S! ink Min 

.Equ 

k'DTAva l 1 +2 

5 

1.3 Sics of slinky blocks. 

SI ink Shifts 

.Equ 

SI inkMin+i 


1 .3 How many times to rotate on Slinky 

St r Work 5 

.Equ 

SI mkShifts+I 

9 

? 

1.3 6 bytes from Word2Str 

KBWidth 

.Equ 

StrWork5+6 


SS on 1 y so f ar . 

My ID 

.Equ 

KBWidth+i 

5 

2 bytes, Cortland 

SegOOType 

.Equ 

My I D+2 


5 1 byte, which segOU i oa.deG 

; ! ypeahead for 

App 1 e 

/ / 0 



TAArea 

.Equ 

Seg O0T yp e+ i 



TALength 

.Equ 

24 . 



TANex t I n 

.Equ 

TAArea+TALeng 

th 


TANex t Out 

.Equ 

TANex t I n+1 




end of" file. 22 
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FI LE . 22 


LAN 2,1 Host Entry Points 


« i n 0 s.r e yrsDuBa 


l Skip 

JMP 

; Sk i p 

.Byte 

ABut+er 

ibQLl 

AC's! 1 SegTab 

.Equ 

B4ReadTest 

.Equ 

A+ ReadTest 

.Equ. 

B4WriteTest 

.Equ. 

B4E1 emsTest 

.Equ 

? Variables 

common to 

StrWorkS 

.Equ 

MainlnMem 

.Equ 

T ask Table 

.Equ 

PrevSegLoad 

.Equ 

Cal 1 SegTab 

.Equ 

CByte 

.Equ 

Aval 1 ab 1 e 

.Equ 

Str . ceO / e • 

.Equ 

CursorQnSw 

.Equ 

LeaveAl one 

.Equ 

ChUnderCur 

.Equ 

SaveE 1 

.Equ 

AskForProg 

.Equ. 

Cal 1 Seg 

.Equ 

CCkte 

.Equ 

C [ ear DA 

.Equ 

Cl earTA 

.Equ 

Cl earWindow 

.Equ 

ConsDriver 

.Equ 

ConvlTP 

■ Equ 

D i eNow 

.Equ 

D l vWord 

. Equ 

DoBel 1 

.Equ 

BoGoToXY 

.Equ 

DoHe 1 p 

.Equ 

D ! 1 est Ava i ! 

.Equ 

DTIsFul 1 

• Equ 

EnterCommand 

• Equ 

Full Ex it 

.Equ 

SetScrL i ne 

.Equ 

bet Args 

.Equ 

BetVBar 

.Equ 

HighLight 

.Equ 


to the routines in Hosi 
Re; o c a t e 
Vers i on 

HostLoc n+4 
ABu-f f er+ k 

ACa ] o eg! ab+ k 
B4ReadTest+4 
A-fReadTest+4 
B4WriteTest+4 

ail routines 
B4E1 emsTest+4 
StrWork3+4 
MainlnMem+l 
i asr, I ab 1 e+4 

PrevSegLoad+1 

Cal 1 SegTab+F'osSegsX4+ i 
CByte+1 

Aval i ab ; e+3o = 

Str i k eQver+ i 
CursorQnSw+1 
LeaveAl ane+2 
ChUnderCur+1 

SaveE 1+1 
Ask F orProg +3 
Cal 1 Seg+3 
CC2S+3 
Ci earDA+3 
Cl earTA+3 
Cl earWindow+3 
ConsDriver+3 
Con v 1 TP+3 
BieNow+3 
DivWord+3 
DoBel I +3 
DoGoToXY+3 
DoHel p+3 
DTTestAva.il +3 
DTIsFul 1 +3 

EnterCommand+3 ; Z is 
Ful 1 Ex it +3 
6e t Sc r L i n e + 3 
SetArgs+3 
GetVBar+3 


Page 8V 


to see if called anywhere 



IQDisabl e 

.Equ 

HighLight+3 

lOEnabl e 

.Equ 

IQDisabl e+3 

Mak e I B 

.Equ 

IOEnabl e+3 

MadeAChange 

.Equ 

Mak si 8+3 

Mul tByte 

.Equ 

MadeAChange+3 

Mul tWord 

• Equ. 

Mul tByte+3 

MvLef tRtn 

.Equ 

Mul tWord+3 

MvRightRtn 

.Equ 

MvLe-f tRtn+3 

PopStack 

.Equ 

MvRightRtn+3 

Press Any 

.Equ 

Pop Stack +3 

Print 

.Equ 

F'ressAn y + 3 

Push Stack 

.Equ 

Print +3 

ReadKB 

.Equ 

PushStack+3 

Rest Cursor 

.Equ 

ReadKB+3 

SaveBoToX Y 

.Equ 

ft e s t C u r s o r + 3 

SetUCC 

.Equ 

SaveBoToX Y+3 

SetUCS 

.Equ. 

BetUCC+3 

StrCmpRtn 

.Equ 

SetUCS+3 

StrMvRtn 

.Equ 

StrCmpRtn+3 

StrWrRtn 

.Equ 

StrMvRtn +3 

Trap 

.Equ 

StrWrRtn+3 

VBarWrRtn 

.Equ 

Trap+3 

Wa i t 

.Equ 

VBarWrRtn+3 

WipeOut TA 

.Equ 

Wait +3 

Write 

.Equ 

WipeQutTA+3 

WritlByte 

.Equ 

Writ e+3 

Wr i teF'E 

.Equ 

WritlByte+3 

WntPRtn 

.Equ 

WritePE+3 

WriteCom 

.Equ 

WntPRtn +3 

WriteRUSure 

.Equ 

WriteCom+3 


— end of file. 22 



FILE. 23 


LAN 2.1 Sub-hos 

t Entr 

y Po i n t s 


; fhese are references 

to the routines in Sub He 

vet 

bMAvai 1 Count 

• Equ 

LSubHost+2 

= x . *..j name changed 

SMGetBl ock 

• Equ 

SMAvail Count +3 


SHSetCel 7 

.Equ 

SMGetBl ock +3 


SMGetStrings 

.Ecu 

SHSetCel 1 +3 


SMMaxCo ! 

.Equ 

SMGet St r i n g s +3 


SMPutBI ock 

.Ecu 

SMMs.;-; Col +3 


SMPutCel 1 

.Equ 

SMPutBI ock +3 


SMF'utStrings 

.Eau 

SMPutCel 1 +3 


SMRel Bi ock 

.Equ 

SMPutSt r i n g s +3 


ShRetBSize 

.Equ 

SMRel Bl ock +3 

; 1.3 Name changed 
; 1.3 Name changed 

SMRetWPSize 

.Equ 

SMRetBSize+3 

Convl FDec 

.Equ 

SMRetWPS x z s+3 


DlspEsc 

• Equ 

ConvlTDec+3 


DispFR 

.Equ 

DispEsc+3 


DispFE 

.Equ 

DispFR+3 


Get Dec 

..Equ 

D x spFE+3 


Get MenuBar 

.Equ 

Get Dec +3 


GetNum 

.Equ 

SetMenuBar+3 


Get St r 

.Equ 

GetNum+3 


Set YN 

.Equ 

Betstr+3 


POSN 

.Equ 

Set YN+3 


Re i' easeKB 

.Equ 

POSN+3 


Word2Str 

.Equ 

Rel easeKB+3 

; 1 .3 name changed 

UndoHel p 

.Equ 

Word2Str+3 

Ver i-fyDel ete 

.Equ 

UndoHe I p+3 


FxrstEmpty 

.Equ 

V e r i -f y D e 1 e t e + 3 

; Two bytes 

Set AFP 

— end ot -file. 

.Equ 

FirstEmpty+2 


;".~fQ0 V j. 


-AN 2,1 Data ga.se Common Work A rsa 


? Equates and zero page locations tor Data Base 


Task 

• Equ 


n r* a 

{ IS a 3 D S. t 3 . B-53© 

Ham beg No 

.Equ 


•j 

1 

) Main is seg.Ol 

MaxFiel ds 

.Equ 


30 . 


Ha ■' if Wi dtl 

.Equ 


1 80 . 


RptSizeH 

.Equ 


62 b , 

; Bytes for tables 

RptSizeV 

.Equ 


450 . 

5 or \ abs s s sty \ e 

VRLinei 

.Equ 


— 

i 


KAuk B ase 

.Equ. 


33 ; Rel 

ad g r e s ses . • a re in - 

; For report 

formats 

(Tables st 

y] s) 


LRptArea 

.Equ 


600 . 


LCal cArea 

.Equ 


04 . 


: Zero page i 

i d c r esse s 




BR 

.Equ 

ZP+OAS 


For -file loading 

OR 

.Equ 

ZP+OAfi 

«! 

Col umn re g i ster ' 

HR 

.Equ 

ZF'+OAE 

3 

Just in case 

RR 

.Equ 

ZF'+OBO 



ComArrange 

.Equ 


"A"+0AKey 


ComCopy 

.Equ 


"C"+QAKev 


ComOitto 

.Equ 


" ' “ +0AKey 


Compel ete 

.Equ 


"D"+0AKey 


ComF ind 

.Equ 


"F"+0AKey 


ComSroup 

.Equ 


"S" t-OAKey 


Com insert 

.Equ 


"T'+OAKey 


Com Just j-f y 

.Equ 


,, J"+QAKey 


uomCa 1 cCo 

.Equ 


"K"+0AKey 


ComLayout 

• Equ 


H L"+QAKey 


ComMove 

.Equ 


"M"+0AKey 


ComChName 

.Equ 


" N " +0AKey 


ComPrOptions 

.Equ 


“0 "t-OAKey 


ComPrint 

.Equ 




ComRecSel 

.Equ 


"R- AAKm 


ComTotai s 

.Equ 


r ‘ T " +0AKey 


ComStandard 

• Equ 


"V'+QAKey 


ComPrFN 

.Equ 


DAI ey 


Com Zoom 

.Equ 


"Z"+0AKey 


ComF'ASEBACK 

.Equ 


1 1 ,+OAKey 


ComPAGEFORW 

.Equ 


i 0 . -i-OAk ey 



; The -following is the layout o-f the Data base wort area. The beginning 
; address is somewhat variable until this settles down. 

.List 


3 

First the 

items that are com,' 

; Begin the 

tile header re 

cord 

OBHeader 

.Equ 

DBWA 

ASReports 

.Equ. 

DBHeader 

BABARecords 

. Equ 

ASReparts+16 

j Now -fils r 

-ecoras one and 

two, exactly 

BasicMode 

.Equ 

' DBWA+24. 

CurRecNo 

.Equ 

BasicMode+l 

CurrRpNo 

a Equ 

CurRscNc+2 

F Vbequence 

.Equ 

CurrRpNo+1 

FHRetDir 

.Equ 

FVSequence+1 

HDCLine 

.Equ 

FHRetDir+1 

HDbCoi umn 

.Equ 

HDCLine+1 

Mode 

.Equ 

HDCCol umri+1 

NF iel ds 

.Equ 

Mode+1 

NRecords 

.Equ 

NFiel ds+l 

NReports 

.Equ 

N Records+2 

PSL 

.Equ 

NReports+i 

VDCField 

■ Equ 

-3L+2 


between all tiles 


; Address at record pointer 
5 Bank adr of block o-f addr 
I of records 


3 

Blocks of info 

for up to 30 fields, plus some slack 
VDCFiel d+1 

!- HHor 

.ton 

hHFiel d 

.Equ 

FHHor+36 . 

FVHor 

• Equ 

F HF i el d+36 . 

F VV'er 

.Equ 

F VHor+36 . 

Fv'Fiel d 

.Equ 

FvVer+36 . 

FHh iel ds 

.Equ 

FVFiel d+36 . 

s Sel ect data + 

rom f i 1 e . Has t 

o stay as shown in Pascal 

Sel ect On 

. tqu 

FHFiel ds+1 

Sel ect Test 

.Equ 

be < ect On +6 

Sel ectCont 

• Equ 

Sel set Test +-6 

Sel ectData 

.Equ. 

Sel ectCont +6 

F 1 1 ! srl 

.Equ 

Sel ectBata+96 . 

FHNames 

.Equ 

Fill er i +20 . 

; This is the e 

nd of the exact 

•format of the input file 

; The number of 

FHNames stored 

wi i be same as NF iel ds £ bt bytes each . 

3 

Work area to store record pointers. 1025 for //a. 

3 

3073 for ///. 

Record 0 is defaults, i-n are real. 

B! dRecWA 

.Equ 

FHNames+660 . 

B1 dRecTop 

• Equ 

B1 dRecWA+1024. 

; Information that is built while a -file is open, and not important 

; to save when 

cl osed 


CRSPf 

.Equ 

B1 dRecTop 

CurrRpName 

.Equ 

CRSPT+60 . 

ConvError 

.Equ 

Cu.rr-Rp Name+2 1 » 

ConvMore 

.Equ 

ConvError* 1 

Bateln 

.Equ 

Con vMore+ 1 

DateSood 

.Equ 

Dateln+21 . 

XFILLER 

.Equ 

DateSood +1 

FFSWitch 

.Equ. 

XFILLER+1 

FFData 

.tqu 

F+SWitch+l 

IsDateF 

.Equ 

FFData* 32. 

IsTimeF 

.tqu 

IsDateF+1 

L 1 SWork 

.Equ 

IsTimeF+1 

Max Length 

.Equ 

L 1 SWork + 16. 

Numstr 

.Equ 

Max Length* 1 

NFiel dsX2 

.Equ 

NumStr *6 

NewStr 1 

.Equ. 

NFiel dsX2+i 

SaveCWork 1 

.Equ 

Newstr 1+1 

SFDisp] ace 

.Equ 

SaveCWork 1+1 

SortL 

.Equ 

SFDispl ace+1 

SaveFR 

.Equ 

SortL* 1 

TopRecNo 

.Equ 

SaveFR+2 

Work Painter 

.Equ 

! opRecNo+2 

; Following are 

not kept on fil 

e 

Sel ect Type 

.Equ 

WorkF‘ointer+2 

Sel ectNumeric 

.Equ 

Se! ectType +6 

5 S s. v 0 ir? 0 . ect ion puls es wh i ! s in 

del mode, or report 

Selec t Numer i c +48 . 

baveRacSel 

.tqu 

IFCEnd 

.tqu 

baveRacSel +114. 

i Area is 1350* 

2 or 6350*2 , dep 

ending on whether Slinky present. 

ARecords 

.Equ 

IFCEnd 


.If 

Crappity 

.Endc 

ARecords+SmDBRec s+SmDBRecs+ 1 > I I Ma i nBase 


. I f 

Crappity 

f~_ _j _ 

U l~i iQC 

ARec ord s+LrgDBRec s +i_r g DB ftecs + 1 >Pat h Area 

— end of file. 

■~i •} 

O i 
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FILE. 38 


LAN 2.1 Common Work Ansa 

; Common routines -or Spreadsheet assembly 


H 


ha a. n beg No 

.Lou 

.4- 4 . i Main i or EL is seg « 2 4 

l ask 

.Equ 

n r*- rl 

C 

CciT-Ar range 

.Equ 

"A"+QAKev 

LomBl ank 

.Equ 

"B‘‘+OAKey 

ComCopy 

.bqu 

!! C" +OAKey 

ComDei ete 

.Equ 

"D"+QAKev 

ComFind 

.Eou 

"F ,, +OAKev 

Com Insert 

.Equ 

" I "+OAKey 

Corn-Jump 

.Equ 

" J " +0AKev 

ComCal c 

.Equ 

" K " +0 AK'ev 

ComLayout 

.bqu 

“L"+0AKey 

ComMove 

.Equ 

" M " +0 AK'ev 

ComChName 

.Equ 

"N" -i-OAKev 

comOp 1 1 on s 

.Equ 

"0"+0AKey 

ComF'rint 

.Equ 

" P " +0AKey 

ComTitl es 

.Equ 

"T"+0AKey 

ComEdit 

.Equ 

"U"+0AKey 

ComStandard 

.Equ 

"V"+0AKey 

Com View 

« Equ 

"W+QAKey 

Com Zoom 

.Equ 

" Z " +0AKey 

KFormSep 

.bqu 

5 Separates list items in formula 

; Bits for 

Work Type byte 

+0 

BitVai ue 

.Equ 

80 

BitNDIf Zero 

.Equ 

40 p Val ues sol amente 

BitProp 

.Equ 

20 ; Just for labels 

BitSimval ue 

.Equ 

20 ; Just for values. 

BxtProNL 

.Equ 

= Labels not allowed 

BitProMV 

.Equ 

8 r Val ues not al 1 owed 

BitsVFS 

.Equ 

; Bits Value Format Standard 

BitsVFF 

.Equ 

2 5 For val ues 

BitsVFD 

.Equ 

3 

BitsVFC 

.Equ 

4 

BitsVFF' 

.Equ 

o 

BitsVFA 

.Equ 

6 

BitsLFS 

.Equ 

i 

BitsLFL 

.Equ 

2 ; For ] abel s 

BitsLFR 

.Equ 

3 

BitsLFC 

.Equ 

4- 


; Bits for 

iyte 

(.just for 

va i ues) 

BitCal ced 
BitNA 
BitError 
BitMustCal 

.Ecu 80 

.Eou 40 

.Equ 20 

c .Equ 10 

i Must 

calc this time. 

; These ar 

e internal codes 

found in in 

ternally stored strings 

klntCoor 

.Equ 

254 . 

; Next two bytes are XY 

KIntNum 

.Equ 

253 . 

: Next six bytes are number 

KIntDots 

.Equ 

s 

j Rep i aces ... 

KAUnF‘1 us 

.Equ 

2-51 » 

KAUnMinus 

.Equ 

250 . 


KALParen 

.Equ 

249 . 


KAMul t 

. Equ 

248, 


KADiv 

.Equ 

247 _ 


LAP 1 us 

.bqu 

246 1 


KAMinus 

• Equ 

/} cr 

rf£.*fr-J r 


KARParen 

• Equ 

244 , 


KAEx p 

.Equ 

243 . 


KAComma 

.Equ 

•-> A 

; Comma within function 


continued next page 


■ jc ■■ 



— continued 

previous page 



Logical 

operate 

— 

KALessThan 

.Equ 


241 s 

KAStrThan 

.Equ 


240 . 

KAEqual s 

.Equ 


239 . 

KALessEqual 

• Equ 


9 30 

KAGtrEqual 

.Equ 


.:U .S’ / * 

KANot Equal 

.Equ 


236. 


This is 

just used by rep] xcate 

KAbsCoor 

• Equ 


210 . 


Now star 

’t the -functions 

KF Round 

.Equ 


217. 

KFOr 

• Equ 


218 . 

KFAnd 

.Equ 


219. 

KFSurn 

• Equ 


220. ; First because most common 

KFAvg 

.Equ 


221 . 

KFChoose 

.Equ 



KFCount 

.Equ 


•9 9 

KFError 

.Equ 


224 r 

KFIRR 

.Equ 


9 OCT 

KFIF 

.Equ 


226 1 

KFINT 

.Equ 


-99*7 

KFLookup 

• Equ 


228 ! 

K'FMax 

.Equ 


??9 

KFMin 

.Equ 


230 . 

KFNA 

.Equ. 


231 - 

KFNF'V 

.Equ 


nnn 

KFSQRT 

.Equ 


233 , 

KFAbs 

.Equ 


^14 8 

.1 

Now some 

- constants 

KHighCol 

.Equ 


•j r ~l~? 

J.4 1 > 

KFirstDLine 

.Equ 



KDispLines 

.Equ 


18. ; 18 lines on screen 

KLastuLine 

.Equ 


19 . 

LlntNum 

.Equ 


8 ; Length of internal numerics storage 

i l S P 0 j 9 3 S. d d P 5 5 3 c\‘ r»- r G 5 Q P 5 ei d 5 h Q Q t 

CurRow 

.Equ 

ZP+OAB 

; Current Row (1-999) 

CurCol 

.Equ 

ZP+OAD 

k Current Col (1-1275 

Work Row 

« Equ 

ZP+OAE 

; Used by many routines 

Work Col 

.Equ 

ZP+OBO 

; Used by many routines 

; Provided by 

Set Epees 



CC Width 

.Equ 

ZP+0B1 

; Width of current column 

HOn Screen 

.Equ 

ZP+0B2 

e 0 ; no 1 : partial , 2 : fully 

VQn Screen 

.Equ 

ZP+0B3 

; 0 : no , 1 ; Yes 

MaxLength 

.Equ 

ZP+0B4 


■, Provided by 

AccumType 



I sParen 

.Equ 

ZP+0B5 


IsOpr 

.Equ 

ZP+0B6 


IsAI pha 

.Equ 

ZP+0B7 


IsNum 

.Equ 

ZP+0B8 


IsEuiltln 

.Equ 

ZP+0B9 


SwDispBox 

.Equ 

ZP+OBA 

5 Redisplay the entire page, including 

Make IB 




SwDispl2 

.Equ 

ZP+OBB 

l Redisplay all rows within box 

SwBispPl 

.Equ 

ZF'+OBC 

Redisplay line 23 

SwDispCur 

.Equ 

ZF'+OBD 

? Inverse the cursor 

Val idMoves 

.Equ 

ZF'+OBE 

; Valid cursor moves, see next two lines 

Val idRows 

.Equ 

80 


Val id Col s 

.Equ 

40 


Val idAny 

. Equ 

80+40 


DispFRows 

.Equ 

20 

1 Tell expand cursor to display full rows 

DispFCol s 

• Equ 

i 0 

; Tell expand cursor to display full cols 

Val idlDim 

.Equ 

08 

5 Only allow expand in one direction 

IsArrow 

.Equ 

ZP+08F 


SwRecal c 

.Equ 

Zk+OCO 
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; Zero page locations -for 
Zlvai 1 .Equ 

CX2I Val 2 .Equ 


=rt to interne 
ZP+0C1 


; Bits for the 

above two bytes, indicating what ' s valid right now 

OKLinPM 

.Equ 

SO 

: Unury plus or minus 

QKOpr 

.Equ 

40 

; # + - / or 

QKD'ots 

.Equ 

20 

; ... (between operators 

OKRParen 

.Equ. 

10 

; Right paren 

OKftt 

.Equ 

08 

; § sign 

OKDecPt 

.Equ 

04 

; Begins a number 

OKLParen 

.Equ 

02 

; Left paren 

OKA! pha 

OKNum 

.Equ 

01 

: A to Z, starting coordinates 

. Equ 

80 

; Start CX2IVal 2 , numeric 

QKArrow 

.Equ 

40 

; Can use arrows to find cell 

OKComma 

» Eq u 

20 

: comma is OK 

OKEnd 

-Equ 

10 

j Ok to end now, by CR or arrow. 

; Zero page as 
t OAB - CCS 

signment : 

Used throughout, defined 

here 

; 0C9 - 0D8 

Def ined 

and used in Main 

on) y 

; 0D9 - 0E4 

Def ined 

and used by Edit 

M 

i UE4 - OEF 

Defined 

and used by Edit 

E, EditL, etc. 

; The following is the 

layout of the spreadsheet work area. 

; Information 

the file 

that must be kept while the fils is in memory, 

; but closed 

FCFRows 

.Equ 

b'SWA 


FCFCol s 

.Equ 

hCFRows 

+1000. : 128 bytes 

] Try to keep 

SSHeader 

aligned where it 

was x n . u 

SSHeader 

.Equ 

SSWA+12 

SO. : File header record 

Col Widths 

.Equ 

SSHeader+3 ; 128 bytes 


SI obal 

variabl es 


bl oOrder 

.Equ 

Col Widt 

hs+128. s Initial s Appropriate 

G! oReCal c 

.Equ 

31 oOrder+1 i Initial: Automatic 

SvLocn 

. Equ 

SI oReCs 

1 c + 1 | Cur-Row , CurCo 1 

; Information 

that controls the views 


VI Views 

.Equ 

SvLocn+3 

; Split "1 S(ide by side, T (op and 

bottom 

VI Sync 

.Equ 

VIViews+1 

; Boolean, sync or not if two view 

; Information 

for the current view, or 

window 

VCB1 ock 

.Equ 

VISync+1 


VcLF or mat 

.Equ. 

VCB1 ock 

; Standard for view — Initial ; Left 

VCVFormat 

. .Equ 

VCLFormat+1 

; Standard: Initial : Appro., 0 le 

VCTLVer 

.Equ 

VCVFormat+2 

j lop left corner , ver on screen 

VCTLHor 

.Equ 

VCTLVer+1 

3 rap left corner, har on screen 

VCTTLRow 

.Equ. 

VCTLHor+1 

; Titles, top left row (may be zer 

VCTTLCol 

.Equ 

VC TTLRow+2 

3 Titles, top left col 

VCTLastRow 

.Equ 

VCTTLCol +1 


Vl I Lasted 

.Equ 

VCTLastRow+2 


VCBTLRow 

.Equ 

VCTLastCol 

; Body, top left row 

VCBTLCol 

.Equ 

VCBTLRow+2 

5 Body, top left col 

VCBTLVer 

.Equ 

VCBTLCol +1 

; Body, top left ver (of first row 

VCBTLHor 

. E L 

VCBTLVer+1 

; Body, top left her (of first col 

VCBBRRow 

.Equ 

VCBTLHor+ 1 

l Body, bottom right row 

3 Body, bottom right col 

VCBBRCol 

.Equ 

VcBSRRow+2 

VCBBRVer 

.Equ 

VCBBRCol +1 

1 Ver coord of bottom right corner 

box 

VCBBRHor 

.Equ 

VCBBRVer+ 1 

; Hor coord , 

VCBWidth 

.Equ 

VCBBRHor+1 

: Actual i3t-f*een uu: —■ needed Tor 

displayed data 
VCRPart i a i 

.Equ 

VCBWidth+1 

; Boolean -right col is partial 

VC l i t 1 es 

.Equ 

VCRPart ial +1 

: TOP: x ' 80 ' , left side: x ' 40 ' 


ngth 


End of Vic 


■ Equ 

(current; 


VCTit! es+1 
parameters 
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e Information 

vsei ock 

VSLFormat 

VSVFormat 

VSTLVer 

VSTLHor 

VSTTLRow 
VSTTLCo 1 
v STLastKO w 
VSTLastCol 

VSB I LRow 
VSBTLCol 
VSBTLVer 
VSBTLHor 

VSBBRRow 

VSBBRCol 

VSBBRVer 

VSBBRHor 

VSBWidth 

VSRPartial 

VSTitles 

VSB1 ockE 
; End of View 


; Area to save 
; returned to 
. : 
SvVCCol 
SvVCRow 


Protect ion 
CameFrVC 
cal ced . 


RWidth 

RLMargin 

RRhargin 

RChPerlnch 

RLPaper 
RIMargin 
KBMargin 
RL i nesPer Inch 

RSpacing 
ftf'CC 
RDashes 
empty 
RF --Title 


ZoomlnSw 
FCFEnabl e 

— continued 


for the 

3 0 C O D • Q B. r V V 1 0 W 

(xe 

where th< 

s cursor 

i sn ' t ) 

. equ 

VCBl ockE 





.Equ 

VSB 1 ock 

»s 

Initial : 

Left 


•. £ q y. 

VSLrormat+1 

a 

5 

Initial : 

Appro , , 

0 1 ength 

.Equ 

VSVFormat+2 

5 

T od 1 ef t 

corner , 

v 0 r on 3CP00 n 


.Equ VSTLVer+1 

.Equ VSTLHor+1 

.Equ VSTlLRow+2 

.Equ VSTTLCo] +1 

. tqu VSTLastRow+2 

.Equ VSTLastCol +1 

. Equ VSBTLKqw+L 

.Equ VSBTLCol +1 

, Equ VSBTLVer+i 

.Equ VSBTLHor+1 

.Equ VSBBRRqw+2 

.Equ VSBBRCol+1 

.Equ VSBBRVer+i 

.Equ VSBBRHor +1 

.Equ VSBWidth+1 

.Equ VSRPart i a 1 + i 

.Equ VSTitles* 1 

• secondary) parameters 


the current window so that exact position can be 
during replicate and formula expansion 
.Equ VSB 1 oc k E 

.Equ VCBI ockE-VCB! ock+SvVcBl ock 

.Equ SvVcCol +1 


More variables 

.Equ SvVCRow+2 ; Boolean, on or off 

F ection+3 j Be ean , if ^al ui s i eec t c be . 


The following are printer formatting variables. They 
get initialised to zero with a new file. The print 
routines will initialize to real initial values. 


.Equ 

CameFrVC + 1 


f 1 E | 

.Equ 

RWidth+i 


Inches XX. X 

• Equ 

RLMargin* 1 

? 

Inches XX.X 

.Equ 

RRMargin+1 

5 

NN 

.Equ 

RChPerlnch+l 

5 

Inches XX.X 

.Equ 

RLF'ao er+ i 

5 

Inches XX. X 

.Equ 

RTMsrg in+ i 

V 

? 

Inches XX.X 

.Equ 

RBMargin+1 



.Equ 

RL i nesPer Inch+1 

5 

Char S D or T, all languages 

.Equ 

RSpacing+1 


Max 13 control char for pr. 

.Equ 

RPCC+14. 

5 

Boolean print dashes for 

.Equ 

RDashes+i 

5 

Print title block on report 

Keep track 

gt zoomed in or not 



3 !™ L‘. 

Fitl‘e+1 



.Equ. 

ZoomlnSw+i 


New 2 , i 

t page 






— continued previous page 


< 

Work area 

to store recurd oomters. 999 for either machine 

ARecords 

.Equ 

SSHeader+3'ou . 

BotRtRow 

.Equ 

ftRecords+MaxSSRows+MaxSSRows+2 

BotRtCol 

.Equ 

Bot Rt Row+ 2 

ConvError 

.Equ 

BotRtCol +1 

ConvMore 

.Equ 

ConvError+1 

LKBr 1 

s Equ. 

ConvMore+i 

CXISaveX 

.Equ 

CRSPT+256 . 

CXISWork 

• Equ 

CXISaveX+1 

LJCol No 

n Equ 

CXISWork +128= 

LJRowNo 

« in Cj c.-. 

LJCol No+3. 

LJCel 1 ID 

.Equ 

LJRowNo+4 

LocFormat 

.Equ 

LJCel 1 I D +6 

Work Type 

5 

.Equ 

LocFormat +1 ; two bytes. Values and 

propd 1 abel s use i , reg 1 abel s use 1 

Work F PD 

.Equ 

WorkType +2 : Values on l v 

Work Mai 

.Equ 

WorkFPD +8 5 Values and non-prop label: 

CXSIResul t 

.Equ 

Work Vs 1 +128 . 

CX2IRel ative 

.Equ 

CX2IResul t+1 

PrevDAddr 

.Equ 

CX2IRel ative+1 


Stuff for 

high! ighted box 

81 AnchCol 

.Equ- 

PrevDAddr+2 ; Cursor posn at entry 

B1 AnchRow 

.Equ 

B1 AnchCol +1 


Set-Corner 

s places the top left, and bottom right vval ues 

81 SoStCol 

• Equ 

81 AnchRow+2 ; Top left corner 

81 SoStCol +1 

B1 SoStRow 

.Equ. 

81 SoQddCqI 

.Equ 

S’lSoStRow+2 ; Bot right corner 

81 SoOopRow 

• Equ 

B1 BoOppCol +1 


Destination row and column 


B1 DsStCol 

.Equ 

81 SoOppRow+2 


81 DsStRow 

.Equ 

81 DsStCol +1 


81 DsQppCol 

.Equ 

81 DsStRow+2 

p Bot right corner 

81 DsOppRow 

.Equ 

81 DsQppCol +1 


; 

Note that 

source and destination 

are switched during 


parts of 

Repl icats. 


Rep 1 Work 

.Equ 

81 DsQppRow+2 

: 128. bytes 

FFData 

.Equ 

Rep 1 Work + 1 2S . 

^ 30 bytes 

FFTvpe 

.Equ 

FFData+30 . 


FFCoor 

.Equ 

FFType+i 


SSCal 1 er 

.Equ 

FFCoor +6 

? Command that cal 1 ed segmei 

1 

CXIF'Type 

1 3 


5 

0 i Lei t 

oaren was not following 

an @ function 


non zero: 

Is the parameters byt 

e from the @functin table 

CXIF'Type 

.Equ. 

SSCal .' er+ i ~ 

20. bytes, just for EditM 

; This next 

work area is 

for reading and writing 

whole rows. The 

^ 3 i z 0 is i. 

: . j byte* 

26K system . 


81 dRecWA 

.Equ 

' CXIPType+24. 



: ■ t ' ainBa; e 

Crapp ity ss/common-sm 
.Endc 


. i t 81 dRecWA+LrgSSBA+i XPathArea 

Crapp ity ss/common-l rg 

.unde 

— end of file .38 
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LAN 2.1 Word Processor Common work Araa 


; Common routines tor Word Processor assembly 
l Equates for Word Processor 


FirstuLine 

I nt Return 

. Equ 
.Equ 

o 

ODD 


i Internal 

rep of Return 

MainSegNo 

.Equ 

16. 


? Ha in is 

509 -i- 6 

Task 

a hC|U 

"W" 


1 i e . , Su i 

Ck ” 1 i a 

v i s i b ! eCR 

.Equ 

?F 


: End of 1 

me in zoom in 

j Z 0 p o p a 9 0 
CurSvSw 

addresses f 
.Equ 

. . :k Wri :er 
ZP+0A8 

5 

Bool ean , curs 

or has to be found 

Last Ver 

.fcqu 

ZF'+OAA 


Last screen 1 

ine available for text 

; The next 

two indicate 

what screen 1 ines 

3 

ar 

Usually 21. 
e to be disc la 

yed by routines. 

DispFrom 

.Equ 

ZP+OAB 



DispTo 

DispOver 

. — q 
.Equ 

Z P+0 AC 

ZF'+UhD 

3 

Bool ean . Mas 

t display over previou 

DispLn22 

.Equ 

ZF'+OAE 

3 

5 

data, whatever it was. 

Boo 1 ean 

DispLn23 

.Equ 

ZF'+OAF 




j The next are pointers within the data structures 

CurAdOSP ,Equ ZF'+OBO ; Address of DSP corresponding to 

I current cursor location. Not 
; al ways current 

PrevAdDSP .Equ ZP+0B2 


Zero page information about current data 1 ins 
First for text ines 


DLStick ies 

-Equ 

ZP+0B4 



DLLength 

.Eau 

ZP+0B5 


01-50 is text 

DLCRBit 

.Equ 

ZP+0B6 




In case 

data 1 

i n £ i 5 c o m -T{ 5. n \ c- 

or carriage return 

uLCount 

.Equ 

ZP+0B4 



DLCommand 

.Equ. 

ZP+UB5 

; D0+ is 

command 

ComBol d 

a tZ. Cj U 


o 

; Control B 

ComCopy 

.Equ 


"C"+0AKey 


ComDel ete 

.Equ 


"D" +OAKey 


ComFind 

.Equ 


"F”+uAkey 


ComCal c 

.Equ 


"Kd'+QAKey 


ComMove 

.Equ 


“M‘‘+OAKey 


ComChName 

.Equ 


' : ■ } 


ComF'r Options 

.Equ 


"l “ +C iKe'j 


ComPrint 

.Equ 


"P“+QAKey 


ComRepl acs 

.Equ 


"R"+OAKey 


ComSticky 

.Equ 


“ “+OAKey 


ComTabs 

.Equ 


"T"+OAKey 


ComUnderLine 

.Equ 


12. 

; Control L 

Com Zoom 

.Equ 


M 7 1; i DA i- r- • 

i. “H uH Key 


ComPageBack 

. Equ 


1 1 ,+OAkey 


ComPageForw 

.Equ 


lO.+OAKey 




j tquates that 

def me 

the prin 

ter options 

, hakes them easier to change. 

PQPW 

.Equ 


CDS 


POLH 

.Equ 


0D9 


FORM 

.Equ 


0 D A 


FOCI 

.Equ 


ODB 


POP 1 

.Equ 


ODC 


POP2 

.Equ 


ODD 


F'OIN 

• tqu 


ODE 


POJU 

.Equ 


DDF 


POUJ 

.Equ 


CEO 


PQCN 

.Ecu 


UEl 


POF’L 

.Equ 


0E2 


F’OTM 

.Equ 


0E3 


POtiM 

.Equ 


0E4 


POL I 

.Equ 


0E5 


P Qbb 

.Equ 


0E6 

5 Single spacing 

PODS 

.Equ 


0E7 


POTS 

.Equ 


OES 


PONP 

.Equ 


0E9 


POGB 

.Equ 


OEA 


POSE 

«Lqu 


OEB 

5 Group . 

POHE 

.Equ 


OEC 


PQFO 

.Equ 


OED 

; Footer 

POSK 

.Equ 


OEE 


POPN 

.Equ 


OEF 


POPE 

.Equ 


0 F 0 


PQF’H 

.Equ 


OF 1 


POSM 

a Li Cj LI 


0F2 


f) 

These 

are not 

avai ab * e oi 

n options menu. They are inserted 


when ; 

printing 



PDPNP ! us 

.Equ 


0F3 


F'OPC 1 

.Equ 


0F4 ; 

Page break, count is page number 

P0PC1P1 us 

.Equ 


0F5 ; 

Page break, count+256 is page number 

PQPC2 

.Equ 


0F6 ; 

Page break, split a paragraph 

P0PC2P1 u.s 

.Equ 


OF 7 5 

Page break , split a paragraph 


Imbedded commands 


POBB 

• Equ 


001 


PuBE 

.tqu 


002 


POP! usB 

.Equ 


003 


PQF’1 usE 

.Equ 


004 


POMinusB 

.Equ 


005 


POMinusE 

.Equ 


006 


F'OUB 

• Equ 


007 


F'OUE 

.Equ 


OOS 


POPP 

.EQU 


009 


POEK 

• Equ 


00A 


POStick 

.Equ 


00B 


F'OMM 

.Equ 


00C ; 

Out of order 


I The following is the layout of the Quick Writer work area,, ihe beginning 

; address is somewhat variable until this settles down. 

.List 

5 Information that is built while a file is open, and not important 
; to save when closed 

5 Leave a two byte buffer for mistakes 

BidRecWA .Eou WPWA 

BldRecText ,Equ BldRecWA+i ; Text portion 

; One switch for each of first 22 lines on screen 0..21. The value 
•, is the number of characters displayed the last time the line was done. 
i Values are from 1 to decimal 80. $Hex 80 is a special case of a 
; carriage return display 

PrevUisp .Equ B1 dRecWA+100. 

; A pointer to the BSP' in BSPTab for each line on the screen . Zeroes are valid, 

; and indicate beyond the end of the document 

ScrAdDSP .Equ PrevBisp+24. 
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continued next page 



- continued previous page 


Information about previous ! ine. Only 
First for text lines 


PLSti Okies 
PLLength 
PLCRBit 
PLRecWn 


PLCount 

PLCommand 


.Equ ScrAdDSP+48 . 

. hqu PLSt i ck i es+l 

„£qu PLLength +1 

.Equ PLCRBit+i 

j. n case data i ine is command or 
.Equ PLSti ckies 

.Equ 


How to find the cursor if its place is marked 
i past the first byte of a certain DSP. 


CurSvDSF' 
CurSvCount 
CurSvLH 
on 1 v 
CurSvPE 
CurSvAtLM 
CurSvVer 




,Equ 

.Eau 


.equ 

.Equ 

.Equ 


; Request being made of 
CallerComm .Equ 


segment 


PLRecWA+82 . 

; 

CurSvCount+3 

CurSvLM+ 1 
C-urSvPE+ i 
CurSvAtLH+i 

. Like #ComPrint 
CurSvVer+ 1 


Length 82 

image return I ine 

j so many bytes 

3 bytes bytes to skip past. 
In case forget, comm lines 


Byte 
Bool ean 
Ver wher 


past last valid char 


was on Lh at time 


$V W8.8 


pressed 


j Tell Put Cur Data to bitch about lost text. Don't 
PCBitch .Equ CallerComm+l 

; Beginning of the word processor master record. 
WPHeader .Equ PCBitch+1 

MSNextDSP .Equ. WPHeader 

I WF i 1 1 er 1 . Equ MSNsx tBSP+2 

TabStLen .Equ IWFilleri+2 

tabStops .Equ TabStLen +1 

ZoomlnSw .Equ. TabStops+80. 


in 


y 


ADDSP tap line when left 


no-stop , !1 ! 


stop 


These parameters are used to return to the same screen 
this file is selected from among those on the desktop. 


j on di sk , 
ResumeDSP ' 
I WLastVer 
IWLastHor 


Val idPagin 

MinLM 

MMInDoc 


they are re-initial iced wher 


contents whenever 
A! though saved 


.Equ 
.Equ 
.Equ 

Now some mis 

.Equ 

.Equ 

.Equ 


i a tile is 


ZoomlnSw+l 
H e s u me By P+ 2 
IWLastVer+l 

Pi 1 an sous stuff 
IWLastHorti 
Val idPagin+1 
MinLM+i 


sad from disk 
Tod 1 ine o-' screen 


Boo i ean , pagination is Oh 
Min Left Mar whole doc. 
Boolean, mail merge in file 


Work area to store record pointers 
D000 are commands 
depending on whether SI inky here or not 
First text 1 ine is right at ARecords 
, Equ WPHeader+300 . 


Values higher than 

5 


* it 

Crappity 

.Endc 

■ I f 

Crappity 

.Endc 


AKecords+SmWPRecs+SmWPRecs+ 1 1 1 Ha mBass 


Er jwPRecstLrgWPPecs+l >PathArea 


enc 


i I e .36 
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} 


FILE. 24 

2 ■ i LAN Print? r- De f i n i t i on s Ch an oe s 


So other 


segment Seg.PR 

. It is definitions of print 

relative to z 
i I oaded . 

ero, so all word addresses wi 

. Incl ude 

/p/ial 1 /common 

. Incl ude 

.List 

/p/ial 1 /Macros 

.Proc 

PRDef s 

.Grg 

0 

>nts can gee o 

ast the environment record on 

enough bytes 

to store environment, record. 

.Byte 

0E0 $ HardF’athName 

32. ; Skip pathname V2 

.81 ock 

.Block 

4 ; Various 

.If 

Language* "A" 

.String 

.Endc 

" 10/01/8 7” 

.Block 

10. ; Filler 

,B1 ock 

ERELength 

,B1 ock 

ERELength 

.B1 ock 

ERELength 

.String 

"Drive 2" ; MainPathNami 


1 of 


.Block 




Remainder of MainPathName 


Now space for 768 bytes that come from DiOO thru 
D3FF when we load. 

.Block 300 


, In cl uds 


/p/ial 1 /segprl 


; Table of number of dots 

. If 

for Apple BMP proportional chsi 

Language* 1 ^" 

•-•acters.. 

PATWidths .Byte 

0 7 . +80 , 07 . +80 ,10, ,14, 

} 20-23 

.Byte 

12. .16. +80 ,13. , 07 . 

; 24-27 

.Byte 

"lY7 i ” i r 

y ' . ,v; . ;li. 

0 , . +BU ,12. , 0 / +80 , 1 2 . 

rt OQ-OD 

-C. CL 22 

.Byte 

; 2C-2F 

.Byte 

19 |9 19 (9 

X j... a a U: u a j. j*. * q X — . a 

; 30-33 

.Byte 

1 V 1 “ • i ~ * 1 

.u t q if. c t 16 > ■! if. ( 

j 34-37 

.Byte 

12. ,12, ,07. +80, 07, +80 

5 38-3B 

.Byte 

12 . ,12. ,12. , 12. +80 

; 3C-3F 


.Byte 
. Byte 

.Byte 

.Byte 

.Byte 

.Byte 

.Byte 

.Byte 

,Endc 


14. ,16. ,15. ,14. ,15 

1 e AO i -J 1 --5 ' , <- 


II tj j- iJ B r. A. 


,15. ,14. 
.16, ,15. 


13. .16. ,15. .12. ,14. ,15. ,16. ,17, 
11 . ,14. ,11 . ,12. ,12. ,12. ,12. ,17. 

07. . 12. .12. .10. .12. .12. .10. .12. 

12.. 08 , 5 07 .,10., 08 . ,16. ,12. ,12. 

12 . . 12 . . 10 .. 12 . . 10 . . 12 . . 12 . . 16 . 

12 . , 12 . , 10 . , 10 . , 07 . , 10 , , 13 . , 00 , 


40-47 

48-4F 

50-57 

58-5F 

60-67 

68-6F 

78-7F 



; SO means it 
f'CTWidths 


PFTWidths 


Verytnd 


* 0 + 120ths + 

or Apple 1 

punctuation . 


Byte 

06 .+80 

Byte 

10. ,10 

Byte 

1 0 . . 1 0 

Byte 

10 ,+80 

Byte 

10. ,10 

Byte 

10. ,10 

Byte 

10. ,10 

Byte 

12. ,10 

By t e 

10. <14 

Byte 

1 4 « , ub 

Byte 

1 all. , r. .1. — f 

Byte 

14. ,14 

Byte 

10. .10 

b’yts 

12. ,06 

Byte 

17 1 ■-■ 

4. t c 1 A 

Byte 

1 n * •-? 

i A 1 3 A ..... 

o-f dots ■for 

Epson FX 

Byte 

12. +80 

Byte 

1 2 1 7 

i a... B ij A •*— 

Byte 

06 . ,06 

Byte 

0? .+80 

Byte 

12. ,08 

Byte 

1 71 17' 

Byte 

12.12 

Byte 

10. ’,12 

Byte 

1 1 

J. jU a | i Jn 

Byte 

12. ,08 

Byte 

12, ,12 

Byte 

10, ,12 

Byte 

- 1 ‘ s a J. J*. 

Byte 

1 1 ,08 

Byte 

11. ,11 

Byte 

10. ,12 

Equ 

* 

End 



or Apple Letter Qua; it / proportional character 


, 10 . , 10 . 

i «04 » 


« i < 


, 10 . 


Hi) 


20 - 

24- 

op. 

2 C- 

30- 

34- 

38" 

■-Tip 


. ~\~7 

-2B 


■37 

•3B 

3F 


[1 1 4 a j i4* < i 4 a 


1 10 . , 12 , 
.12. ,06. 


, 12 , , 12 , , 14 . 

jt 

40-47 

, 14 , , 14 , , 14 , 

? 

4 b~ 4 F 

, 14 . , 14 . , 14 . 

5 

FiO -57 

, 10 . , 16 . , 12 . 

j 

58 - 5 F 

, 10 ., 08 ., 12 . 

.«) 

6 O - 6 7 

, 14 , , 12 , , 10 . 

? 

O L U 
OO Of 

, 12 . , 12 . , 14 . 

? 

TO -*" 7 " 7 

, 0 b. , 10 . , 10 . 


78 - 7 F 

characters , 




a +80 ,12a 
3 1 2 


20 - 

24- 


i 7 


1 r 


, 10 . 

a +80 

j 

z., i: 

2a, II 
1 *"> 


7-7 

-28 

-•?p 


30- 

34- 

38- 

30- 


33 

•-1-7 

3 / 

3B 

■3F 


ni. n ^ j. .4. a j 14 s sj A ni. a 
0. ,08. ,10. ,08. 

1 . .11 a ,11 . , 12 . 

9. ,10., 08. ,12. 

1 1 1 11 1 7 ' 11 1 7 

J. a a J. A u a ... 4. :: n A 4 an..!, s q A 

0., 12. ,10. ,09. ,05. ,09. 


I'? 1 7 1 

H * ■? A •*••• 

1 2 a ^ 12 


1? 1 " 

q JU B Tj J. J 


, 10 . , 11 . 
, 11 . , 12 , 

, 12 . , 12 . 
, 12 . , 00 . 


'40-47 
48 4F 

50-57 

58-5F 

60-67 

68-6F 

70-77 
7a 7F 


— end 0 + -file. 24 
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